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本 書 の 主 な 目的 は 二 つ あ り , 第 一 は 数 値 解析 を Java で 初め て 学び た いと いう 初 学者 
に 対す る 数 値 解析 の 解説 で あり , 第 二 は すでに Fortran その 他 の 言語 で 数 値 解 析 を 理 
解 し て いる が Java は と りつ き に くい と 感じ て いる , 数 値 解析 の 熟達 者 に 対す る Java 
へ の 招待 で も や る. そこ で , 本 書 の 読者 層 は いろ いろ 想定 され , 理工 系 の 学部 学生 か ら 
計算 機 を 扱え る 研究 者 に まで , 幅広 くわ た る で あろ う . 著者 は 1960 年 代 初 頭 よ り , 数 
値 計算 を 扱っ て きた の で , 手続 き 型 言語 の Fortran 等 に よる 膨大 な プロ グラ ム の 著 積 
を 保存 し て お り , この た び , それ を Java 言語 に 翻訳 し て 解説 する 運び と な っ た . Java 
は オブ ジェ クト 指向 言語 で ある か ら , も ちろ ん Fortran か ら の 一 対 一 対応 の ある 翻訳 
は 不可 能 で ある が , 必要 以上 に オブ ジェ クト 指向 言語 固有 の トリ ッ キ ー な 書き 方 は 抑 
えて , Java に 書き 直し て あぁ る. 実際 の 数 値 計算 で 大 切な こと は , 効率 (計算 の 速 さ ) と 
精度 で ある . し か し , この 二 つ を 強調 し すぎ る と , 解法 の アル ゴリ ズム が 理解 し に く 
く な る 面 も ある の で , 本 書 で は . アル ゴリ ズム を 中 心 に 述べ 。 必要 に 応じ て , 効率 と 
精度 に つい て 詳 輝 し て いる 

本 書 の 特徴 は 以下 の 2 点 で ある . 第 1 点 は , 1980 年 代 に グラ フィ ックス の 国際 規 
格 と し て 制定 され た GKS の 図形 出力 な どの 機能 を Java の グラ フィ ックス 機能 を 用 
いて クラ ス 化 し , それ と いく つか の 追加 機能 を 使っ て 多く の プロ グラ ム の 出力 を グラ 
フィ ックス 化し た こと で ある . この クラ スパ ッ ケ ー ジ mygks は , まだ 改善 の 余地 も あ 
る の で , が 版 と し て 無償 で 提供 する こと に な っ た . 特徴 の 第 2 点 は , 手続 き 型 言語 の 
加 プ ログ ラム 単位 に 相当 する 部 分 は , 同じ よう に 独立 な クラ ス の 単位 に 収め ,、 それ を 
更 う テス ト プ ロ グラ ム か ら 独 立 さ せ て , パッ ケー ジ 化 し て ある こと で ある . さら に ., 
的 に 応じ て テス ト プ ロ グラ ム の 一 つ を 少し 変更 する だ け で 期待 する プロ グラ ム が 書 
ナ る よう に 心がけ て ある . また , ほとん どす べ て の テス ト プ ロ グラ ム は , mygks の ク 
ラス を 引用 し て 図 を 表示 する よう に な っ て いる が , 数 値 解析 部 分 と 表示 部 分 は で きる 
だ け 切 り 分 け て 書か れ て いる か ら , 表示 部 分 が 不要 の 場合 に は 簡単 に 削除 する こと が 
この よう に , 本 書 で 描か れ て いる 図 は , Java の GKS タイ プ の 図形 由 カ クラ ス を 
使っ て 描か れ て お り , 説明 も Java プロ グラ ム を 使っ て 書か れ て いる が , 数 値 解 析 の 解 
説 それ 自体 は , 特に 言語 に し ば られ る こと は な い の で , 他 の 言語 で も GKS パッ ケー 
ジ が 使え れ ば , 参考 に な る で あろ う . 

最後 に . いろ いろ 重要 な 助言 を いた だ いた , 旧 図書 館 情報 大 学 ( 現 筑波 大 学 図書 館 
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第 1 章 








数 値 解 析 と 誤 





由衣 





数 値 解析 の プロ グラ ム を 作る と き , 最後 に 残る 問題 は 誤差 の 問題 で ある 1. プロ グラ 
ム が 意図 し た と お り に 正しく 書か れ て いな けれ ば な ら な いこ と は いう まで も な い が , 
正しく 書か れ て いて も 場合 に よっ て は 誤っ た 答え を 与え る こと が ある . 誤差 に な る 原 
因 を 大 ま か に 分 類する と , 最初 の 入力 デー タ に 隠れ て いる 誤差 , 近似 式 の 打ち 切り 誤 
差 , 刻み 幅 誤 差 , 桁 落ち 誤差 お よび 丸め 誤差 で ある . 計算 の 途中 で 誤差 が ガ 生 じ て い ぃ いれ 
ば , その 後 の 計 算 に と っ て は , その 誤差 が 入力 デー タ の 誤差 に な り , その 伝播 が 問題 
と な る . 

入力 デー タ や , 近似 パラ メー タ な どの (zi,…| , z。) に 隠れ て いる 誤差 (Az, …・, 
Az。) が あれ ば , 最後 の 答え ッ = げ (zi,…・, z。) に も 誤差 Ay が で きる . それ は だ い 
た い 


















































の / 
Ay = ニューAz」 キュ ーーAz5 キー キーーA み 7 11) 
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で 与え られ る . この 式 を 具体 的 に 評価 する た め に は , 関数 ヶ = (Zi, … , z。) が 必要 
で ある が , それ が わか ら な いこ と が 多い の で , 一 般 的 に は z。 の 値 を 少し 変え て 計算 し 
な お し , ヶ の 変化 を 調べ る こと に な る . 結局 の 大 き な に つい て は , 特に 気 を 
付け ね ば な ら な いと いう こと で ある . 

他方 . デ ー タ や パラ メー タ が 正確 で も われ ば この 誤差 は 無視 で きる で あろ うか ら , 数 
値 解析 で 主 に 問題 と すべ き 誤 差 は 残り の 四 つ で ある . 
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電卓 も 含め て , 最近 の 計算 機 に は 四則 演算 や 開平 算 な どの 基本 的 な 演算 は ハー ド 
ウェ ア と し て 組み 込ま れ て いる . し か し , 複雑 な 関数 の 場合 に は , 正確 な 式 で 計算 で 
きる こと も ある が , それ を 級数 展開 し て 有限 個 の 項 の み を 使っ て 近似 する こと が 多い . 
今 で は , 三角 関数 な ども ,. ほとん どの プロ グラ ミン グ 言 語 の ソフ トウ ェ ア , ある い は 


















































+・ 初 学者 で あっ た り , 誤差 の こと を 気 に か け な く て 済む な ら , この 章 は 読み 飛ば し て も よい で あろ う . 
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ハー ドウ ェ ア で 提供 され て いる か ら , それ を 使え ば 済む の で , ユー ザ が 自分 で プロ グ 
ラム を 書く こと は ほとん ど な い で あろ う が , 打ち 切り 誤差 の 説明 と し て , 原点 の 周り 
の cos(z) に つい て 調べ る こと に する . cos(z) を 級数 展開 する と 














1 1 1 1 
2 キー タテ 6 上 ーッ 28 一 (1.2) 


0O8U2) 三 ま ー 4 6! 8! 











で ある . |z| <0.1 の 範囲 で は , 右辺 の 各 項 は 順次 z? で 小さ く な る か ら , 項 を 1 項 多く 
と る た びに , z? の 値 だ け で も 精度 が 2 桁 以上 良く な り , 係数 自体 も 急激 に 小さ く な っ 
て いく . 近似 式 を 使う > の 範囲 に 応じ て 収束 の 速 さ が 異な る か ら , 要求 する 精度 と > 
の 範囲 を 考慮 し て 使う 項 数 を 決め な けれ ば な ら な い . |z| > 1 に な る と , 項 が 進む に 
従っ て 係数 は 小さ く な っ て いく が , z2 の 値 は 大 きく な っ て いく か ら 収 東 が 悪 く , 級数 
展開 を 使う の は 得策 で な いと いえ る . 図 1.1 は , cosz を 式 (1.2) の 第 1 項 の み の 近 似 
か ら , 第 2, 3, 4. 5 項 ま で と っ た 近似 式 に よる グラ フ を 描い た も の で ある . 原点 付近 で 
は , 項 数 を 増やす に つれ て し だ い に 良 く な っ て いく こと が 見 て と れる で あろ う . 
































































































































図 1.1 cos(z) の 級数 展開 . 太い 実線 は cos(z), 細い 実線 は 第 1 項 の み , 点線 は 第 2 項 まで , 


破線 ( 


ある . 











は 第 3 項 ま で , 一 点 鎖線 は 第 4 項 ま で , 二 点 鎖線 は 第 5 項 ま で と っ た と き の 近 似 
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きぐ 











刻み 幅 誤差 














刻み 幅 誤 差 は 数 値 積分 や 微分 方 程 式 の 解法 な ど で , xz 軸 に 沿っ て 処理 を 進め て いく 
と き , 1 回 の 処理 を 行う z 軸 上 の 幅 を 粗く し すぎ る と 顕著 に な る 誤差 で ある . この 誤 
差 は 打ち 切り 誤差 と 相補 的 な 関係 に あり , 積分 や 微分 方 程 式 の 計算 公式 に 出 て くる 級 
数 の 項 数 を 多く と る 良い 近似 で は 幅 を 粗く し て も よく , 項 数 を 少し し か と ら な い 相 
い 近 似 で は 幅 を 細か く と ら な けれ ば な ら な い . 台形 公式 と シン プ ソ ン の 公式 に よる 積 
分 ? を 例 と し て , 刻み 幅 と 精度 の 関係 を 調べ て みる . 台形 公式 は , 1 刻み で は 被 積分 関 
数 を 1 次 式 で 近似 する も の で あり , シン プ ソ ン の 公式 は 2 次 式 で 近似 する も の で ある . 
図 1.2 は 関数 7(z) = 8Vz(1 - z) を , z の 範囲 0.1] で 積分 する と き の 刻 み の 数 を 横 















































2 詳し く は 第 5 章 を 参照 の こと . 


1.2 刻み 幅 誤差 う 


ェ ャ ャ サキ IMUUUUUULLLLL 
3.0 上 の 
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図 1.2 台形 公式 ヒシ ンプ ソン の 公式 に よる 関数 /(z) = 8Vz(1 一 z) の 範囲 [0,1] で の 積分 . 
横 軸 は 刻み の 数 , 縦 軸 は 積分 値 で ある . 台形 公式 に よる も の は oc, シン プ ソ ン の 公式 に よる も 
の は + で ある . 



































軸 に , 答え の 積分 値 を 縦 軸 に プロ ッ ト し た も の で ある . 台形 公式 に よる も の が o, シ 
ンプ ソン の 公式 に よる も の が + で 示さ れ て いる . 正しい 積分 値 は ヵ = 3.14159265 ‥… 
で ある . 

較 1.2 を 見 る と , シン プ ソ ン の 公式 に よる 場合 に は 刻み 数 が 20 程度 で 。 ほ ぼ ァ に 近 
づい て いる が , 数 値 的 に は まだ 満足 で きる も の で は な い . 表 1.1 に 刻み 数 と , 両 公式 
に よる 積分 値 が 示さ れ て いる . シン プ ソ ン の 公式 の 場合 に は , 初め の 4. 5 回 で 3.1 に 
な る が , 台形 公式 の 場合 に は , 20 回 近く で や っ と 3.1 に な り , 回 数 が 増え て も 両者 の 
精度 に は 2, 3 桁 の 差 が ある . 両者 と も 刻み 数 が 1 桁 増え る と 精度 が 1 桁 上 が る 程度 で , 
収束 は あま り 速 く な い . 
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表 1.1 台形 公式 と シン プ ソ ン の 公式 に よる 積分 値 と 刻み 数 . 関数 は /(z) = 8Vz(1 一 z) で , 
積分 範囲 は [0,1] で ある . 最も 下 の 行 に は 答え ァ の 真 値 が 載せ て ある . 























刻み 数 台形 タン ンク 
1 | 0.0 2.6666 
2 1 2.0 2.9760 
3 | 2.5141 3.0520 
5 | 2.8476 3.1000 
10 | 3.0370 3.1720 
25 | 3.1150 3.1379 
50 | 3.1321 3.1402 
100 | 3.1382 3.1411 
1000 | 3.14148 3.14157 
10000 | 3.141589 | 3.1415921 
100000 | 3.1415925 | 3.14159263 
3.14159265・‥・ 
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桁 落 ち 誤差 





プロ グラ ム 上 の アル ゴリ ズム か ら は 気が付か な い が , 実際 に 計算 し て みる と 大 き な 
誤差 が 入っ て くる こと が ある . その 原因 の 一 つ は , 桁 落ち 誤差 で ある . 計算 機 で も 数 
値 は ある 限ら れ た 桁 数 で 扱わ れる の で , ほとん ど 等 し ぃ 二 つ の 数 の 差 を と る と 有効 桁 
数 が 減少 する た め に , 精度 が 悪く な っ て し まう . 極端 な 例 と し て , 理論 上 は 正確 に 1 
で ある べき 2 個 の 数 が あり , 10 進 7 桁 程度 を 扱う 計算 機 で 、 た また ま o=1.000001 と 
5 = 0.999999 で あっ た と する . その 差 は 理論 上 は ゼロ で な けれ ば な ら な い が , 計算 機 
で は g-5= 0.000002 = 2 x 10-6 に な っ て し まう . 元々 それ ぞ れ 6 桁 の 精度 が あっ た 
の に 引き 算 の 結果 は 誤差 だ け に な り , この 結果 を 使っ て 計算 を 続け て いく こと は 非常 
に 危険 で ある . 図 1.3 は . ほとん ど 等 し ぃ 二 つ の 項 ツ 1 二 2 と 1 の 差 が , 関数 


9(Z) 三 V V1 寺 zz2ー1 (1.3) 

















































































































の 計算 で 生じ る 相対 誠 
_ 単 征 度 計算 の y(<) - 倍 和 度 計算 の 7(<) 
四 人馬 度 計 算 の y(<) 6 








を 示し た 図 で ある . 最近 の 計算 機 で は 単 精度 は 10 進 約 7 桁 , 倍 精度 は 約 16 桁 の 精度 
が ある か ら , ここ で は 倍 精度 計算 を 真 値 と し て 使う こと に する . 

参 1.3 か ら わ か る よう に だ, 0.001 < > < 0.002 で は ほとん ど 0 に な っ て は いる が , 
0.001 に 近づく に つれ 振動 が 始ま っ て お り , 精度 は 2^ て 3 桁 し か な いで あろ う . ヶ が 
0.001 程度 以下 に な る と 精度 は 急速 に 悪く な り , = 0.00025 あたり か ら 下 で は -1 に 
な っ て いる . この グラ フ は 誤差 の グラ フ で ある か ら , ハー ドウ ェ ア の アー キテ クチ ャ 
や 平方 の アル ゴリ ズム な ど に 依存 し て お り , 同じ プロ グラ ム を 使っ て も , まっ た く 暴 
な る 結果 に な る こと も あろ う が , ゼロ に 近づく に 従っ て 悪く な る と いう 一 般 的 な 傾向 
は 同じ で ある . 式 (1.3) の 場合 に は , 分 子 の 有理 化 を し た 式 
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桁 落 ち 誤差 の 例 . 実線 は 桁 落 ちの 起こ る 式 (1.3) を 使っ た と き の 相 対 誤差 の 式 (1.4) で 
り , 点線 は 桁 落 ちの 起こ ら な い 式 (1.5) を 使っ た と き の 相 対 誤 差 の 式 で ある . 








1.4 洒 化 式 で 生じ る 桁 落ち 誤差 ( 球 ベ ッ セ ル 関 数 ) 5 
































を 使え ば 桁 落 ち を 避け る こと が で きる . この 分 子 の 有理 化 は , 2 次 方 程 式 の 根 の 計算 
な ど で 使 われ る こと が ある . 





洒 化 式 で 生じ る 桁 落ち 誤差 (上 陸 ベ ッ セ ル 関 数 ) 





特殊 関数 を は じ め , 多く の 関数 系 に は 洒 化 式 が 存在 する . それ は , その 関数 系 の 最 
初 の いく つか の 低 次 の 関数 が わか っ て いれ ば , より 高 次 の 関数 を 低 次 の 関数 か ら 洒 次 
求め る こと が で きる 式 で ある . 多く の 関数 系 の 場合 に 低 次 か ら の 前 進 洒 化 式 を 使う 
こと が で きる が , 円 筒 座標 系 や 極座標 系 を 使う と き 出 て くる ベッ セル 関数 系 で は 桁 落 
ち が 激 し く 生 じ る の で , 最初 に 高 次 の 関数 を 近似 的 に 決め て か ら , 高 次 か ら 低 次 へ の 
後退 河 化 式 を 使っ て , 低 次 の 関数 を 求め る よう に し な けれ ば な ら な い . ここ で は , 球 
ベッ セル 関数 に つい て 述べ る . 球 ベ ッ セ ル 関 数 ヵ (z) は , 次 の 微分 方 程 式 

上 (22) キ ーー の の (1.6) 
の 解 で も る . これ は , 極座標 系 の 動 径 座標 に 関す る 微分 方 程 式 で あり , 変数 z の 定義 
域 は [0.oo) で ある . 次 数 7 は 7> 0 で あり , 7=0^ て 4 の 関数 形 は 





















































70(2 々 ) ニー タ <ー「sin ヶ 

九 ( 々 ) ニー ター2(sin タ ー タ cos ヶ ) 

放 ( 々 2) ニー タツ [(3ー 2 ダ )sin を 一 3z cos |] (1.7) 
73( 々 ?) 4[(15 一 622) sin ター z(15 一 27) cos |] 

74(?) 2-?[(105 一 4522 十 2 sin ター 2(105 一 1022) cos | 


で ある . 図 1.4 は 式 (1.7) を 図示 し た も の で ある . 
これ ら の 関数 は , z 一 0 の 極限 で は 





ッ / 

















7(?) 9 (27+1)H (1.8) 
で あり , z 一 co で の 潤 近 形 は 

5 由 。 旭 

( 々 ) > gin (2- な ) (1.9) 





図 1.4 球 ベ ッ セ ル 関 数 ヵ (z). 実線 は 7 = 0, 点線 は 7 = 1, 破線 は 7= 2, 一 点 鎖線 は 7 = 3, 
二 点 鎖線 は 7 = 4 で ある . 





第 1 章 数 値 解析 と 廊 差 


で ある . 球 ベ ッ セ ル 関 数 の 前 進 滞 化 式 は 








47 の = eo/ -2(?) 1.10) 


と 4 


で ある が , 式 (1.7) ある い は 図 1.4 か ら わ か る よう に , 同じ 値 の > に つい て , 7 が 大 き 
く な る と 妃 (z) の 値 が 小さ く な る の で , この 洒 化 式 を 使っ て 小さ い 7 か ら 大 きい 7 へ 
0 桁 落ち 誤差 が た ち ま ち 大 きく な っ て し まう . そこ で , この 
汐 化 式 (1.10) を 逆 に 大 きい 7 か ら 小さ い 7 へ 降り て くる 後退 洒 化 式 


























326) 有 (2 十 Da の 7+2( る ) (1.11) 





に 書き な お す . この 式 で は 先 の よう な 桁 落 ち は 発生 し な い . の (2)。 7 の (2) の 肩 の 
(用 と (⑰ は 前 進 (forward) と 後退 (backward) を 示す た め の 記 号 で あり , 他 に 特別 な 意 
味 は な い . 図 1.5 は 式 (1.11) で 求め た 関数 値 を 真 値 と し て 式 (1.10) を 割り 。 その 絶対 
値 の 対数 を と っ た 式 

の (の | (1 12) 
.(6) 「 
才 (②) 


で ある . 誤差 が 発生 し 始め る と , 伝播 過程 で た ち ま ち 発 散 し て し まう た め に , グラ フ 
が この 図 以 上 に 見 に くく な っ て し まう の で , 対数 を と っ て 発散 の 値 を 少し で も 緩やか 
に な る よう に し て いる の で ある . 誤差 が な けれ ば この 値 は ゼロ で ある . この 計算 で は 
他 の 誤差 が 顕著 に は 入ら ぬ よ うに , すべ て を 倍 精 度 で 行っ て いる 

後退 洒 化 式 で 使う 最初 の 値 と する た め に , 大 き な 7 の 騙 」5(2) と 騙 L ュ (2) の 値 を 正確 
に 計算 する こと は 困難 で ある . し か し , 各 > に 対し て , ある / (= 47) よ り 大 き な 7 の 
騙 (z) は 無視 で きる ほど 小さ く な っ て し まう の で , 7+2(z 々 ) を ゼロ と し , 271(2) を 非 




















A ど (2) = 1og 







































































図 1.5 球 ベ ッ セ ル 関 数 の 前 進 河 化 式 で 生じ る 誤差 . 誤差 が な けれ ば これ ら の 値 は ゼロ で あ 


る . 

















ヶ が ゼロ の 近傍 に ある 二 点 鎖線 の 細長 く 和 失っ た 三角 は 次 数 7 = 4 の グラ フ で あり , z が 小 












































さい 範囲 で は 7 = 4 で すでに グラ フ で 見 れる ほど の 誤差 が 生じ て いる . し か し , z > 0.1 で は 
小さ く な っ て いる . 同じ く ゼ ロ 近 傍 の 正 の 実線 は 7 = 5 で あり , 誤差 は 非常 に 大 きく な る が , 
これ も > 0.2 で は 小さ く な っ て いる . ゼロ 近傍 で は 7> 5 の グラ フ は も っ と 激しく 発散 し て 
いる が , 図 か ら は み 出 し て お り 現 れ て いな い . > が 大 きく な る に つれ , 小さ な 7 か ら 順 に 発散 
が 収まり 始め , 順次 大 き な 7 の グラ フ が 図 の 範囲 に 見 られ る よう に な っ て くる . 7=5 の 実線 
の 右 の 点線 は 7 = 6 で あり , 次 の 破線 は 7 = 7, 一 点 鎖線 は 7 ニ 8 と いう よう に 最も 右 の 一 点 
鎖線 の 7 = 13 の グラ フ が 現れ る と ころ まで が 示さ れ て いる . 
























































1.5 








常に 小さ な 数 (プロ グラ ム 上 で は 10~-⑳⑯ ) と し て , 式 (1.11) を 使え ば 7 < 7 の 7 に つ 
いて 如 (z) の 近似 値 に 比例 し た 値 を 順次 求め ある こと が で きる . 式 (1.11) を 最初 に 適用 
し て 求め た 狼 /(z) は も ちろ ん 正しく な い が , 式 (1.11) を 繰り 返し 用 いて いく に つれ て 
精度 が 増し て くる . そこ で , いま 必要 と する 7 の 最大 の 値 を ん と する と , > と に た 応 
じ て と る べき 7 の 値 が 定まっ て くる . この よう に し て 求め た ヵ (z) に 比例 し た 数 値 
は , 相対 的 な 値 で ある か ら , 正しい ヵ (z) の 値 に 規格 化し な お さ ね ば な ら な い . その 
た め に は 正しい (z) を 別に 求め 、 それ を 使っ て 規格 化し な お せ ば よい . 7(z) を 求め 
る 式 と し て , z < 0.02 の と き に は 級数 展開 1ー を 2? 3n<* を 用 い , z > 0.02 の と き に 
は 刀 人 を 用 いる . z>0.02 で |sinz| <0.1 と な っ て し まう よう な > ヶ の 範囲 で は 時 2 
の 精度 に 問題 が お 生じ る の で , 7(z) の 代わ り に 妃 ( ぅ ) = Sm ー So82 を 用 いて 規格 化し 
な お せ ば よ 
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計算 機 で 扱う 桁 数 が 限ら れ て いる た め , 最後 の 桁 に は と か く 誤 差 が 入り 込ん で いる . 
手 計算 な ど で も , 円 周 率 の ぇ の 値 を 5 桁 ま で 使う と き に は 真 値 3.141592 ‥. の 6 桁 目 
の 9 を 四捨五入 し て (丸め て ) 3.1416 と する の で , 最後 の 桁 は 正確 で ある と は いえ な 
く な っ て いる . 計算 機 の 内 部 で は , 多く の 場合 数値 を 2 進数 で 表現 し て お り , 最後 
の 桁 ( ビ ッ ト ) は や は り 怪 し く な っ て いる . 10 進数 の 0.1 は 2 進数 で は 循環 小数 で ある 
か ら , 計算 機 で 扱う その 値 は 近似 値 で ある . 実際 . 0.1 を 繰り 返し 足し 込ん で いく と 
10,000 回 程度 で も 精度 は 3 杵 ほ ど 落 ち て し まう . 図 1.6 は 単 精度 の 0.1 を 10,000 回 ま 
で 足し て いく 過程 で , 相対 誤差 


5 0.1 一 0.1% 
? 王 1 


Ay = ニート レーシ シ や OO〔H 1.1 
0.17 (113) 


















































が どの よう に 増え て いく か を 示す も の で ある . 


0.0001 
Ay 


5.000 10.000 回 数 


-0.0001 








図 1.6 足し 算 の 繰り 返し に よる 丸め 誤差 の 蓄積 . 横 軸 は 単 精度 の 0.1 の 足し 算 を 繰り 返し た 


回 数 , 








縦 軸 は 式 (1.13) に よる 丸め 誤差 の 相対 値 で ある 


1.6 








第 1 章 数 値 解析 と 誤 差 


この 式 の 分 子 の 第 1 項 は 0.1 を ヵ 回 足し 算 す る も の で ある か ら , 足す 過程 で 丸め の 
誤差 が 蓄積 され る が , 分 母 な どの 0.1 ヵ は 0.1 を ヵ 倍 する 計算 で ある か ら 誤 差 は 増え な 
ぃ の で , 真 値 と 見 な すこ と が で きる . 繰り 返し 足し て いく 過程 で 、 桁 上 が り が 起こ る 
と 最後 の ビッ ト の 状況 が 変わ る の で , 変化 は 単調 で は な いこ と も わか る . 倍 精度 の 計 
算 を 行う と , 10,000 回 程度 で 精度 は や は り 3 桁 ほ ど 落 ちる が , それ で も 12 桁 程度 は 精 
度 が ある の で , 10,000 回 程度 の 足 し 算 で は , 通常 . あ まり 問題 は 生じ な い . 






























































計算 の 順序 に よっ て 生じ る 誤差 





計算 機 で 扱う 桁 数 が 限ら ちら れ て いる た め に , 気 を 付け な けれ ば な ら な いこ と が も う 一 
つ あ る . これ も ゃ 単 精度 計算 で は た ま に 起 こる こと で ある . 7 桁 ほ ど 大 き さ の 異な る 数 
値 の 演算 は , 演算 の 順序 に 気 を 付け な いと , 小さ い ほ う の 数 値 の 効果 に 悪い 影響 が 出 
て し まう . 例え ば , 単 精度 の 1.0 に 単 精度 の 1.0 x 10~-7 ある い は 1.0x10-” を 1 万 回 
加え る こと に する . 文章 の と お り に , 1.0 に 1.0 x 10-7 を 加え る 操作 を 1 万 回 繰り 返 
す と , 
































(…(1.0 十 1.0 x 10- 人 9 十 1.0 x 10-)…) 二 1.0 x 10~7 (1.14) 


と な り , 1.0 x 10-7 を 1 万 回 加え て か ら 1.0 に 加え る と , 


10000 
10+ う 10x10"7 (1.15) 
ーー 








と な る . これ ら の 結果 は それ ぞ れ 1.0011921 と 1.001 で あり , 前 者 の 場合 に は 誤差 が 
0.0001921 だ け 入り 込ん で いる . この よう に , 単 精度 の 数 値 は 精度 が 7 桁 程度 し か な 
いか ら , 1.0 十 1.0 x 10-7 三 1.000000119 と な り 誤 差 が 蓄積 され て いく . また , 次 の 
場合 は 1.0 二 1.0 x 108 1.0000000… と な り 1.0 x 10-“ の 寄与 が な く な っ て し まう . 
そこ で , 小さ い 数 同士 を まず 足し て か ら , 大 きい 数 と 足し 合わ せな けれ ば な ら な いこ 
と が わか る . 

21 世紀 に な る 頃 か ら 計 算 機 の 性 能 は 飛躍 的 に 向上 し , 計算 速度 が 速く な っ た ば か り 
で は な く , 実 メ モリ や 補助 メモ リ が 安価 に な り 大 量 の デー タ が 使え る よう に な っ た . 
そこ で , 数 値 解析 を 主 な 目的 と する Fortran で は 倍 精度 の 計算 が 普通 と し なり, Java で 
は double が 標準 と な っ て いる の で , 丸め の 誤差 や 桁 落 ちの 誤差 な ども , 以前 の よう 
に は 気 に し な く て よく な っ て いる . し か し , 打ち 切り 誤差 や 刻み 幅 誤 差 に は , 相 変 わ 
ら ず 注意 が 必要 で ある . これ ら は , 数 式 の 性 質 か ら 理 論 的 に 決め られ る こと も ある 
が , や やはり, パラ メー タ 値 を 振っ て みて , 試行 錯誤 で 式 (1.1) を 調べ る こと も 必要 で あ 
ろう . 























































































































演習 問題 9 


演 壮 問 是 


























1.1| 図 1.1 の プロ グラ ム Z01.01_cos.java を 拡張 し て , 式 (1.2) の 7 項 ま で の 図 を 描 
き な さ い . 7 項 ま で の 式 を 知ら な か っ た ら , 自分 で 調べ る こと . また , プロ グ 

ラム 名 は QO1_.01.Z01.01_cos.java と する こと . 
解答 例 : ソー スプ ログ ラム QO1_01_Z01.01_cos.java 









































2.1 





一 組 の デー タ を , ある 順番 の 規則 に 従っ て 並べ 替え る こと は , デー タ の 大 小 を 比較 
する だ け で 計算 を する わけ で は な い が , 計算 機 に と っ て 得意 と する と ころ で ある . こ 
の こと は ソー ト (sort) と いわ れる . ある 順番 の 規則 に 従っ て 並べ られ て いる 複数 の 組 
の デー タ を , その 順番 の 規則 に 従っ て 並べ な が ら 混ぜ 合わ せる こと は , マー ジ (merge) 
と いわ れる . ソー ト と は 逆 に , 不 規則 に 並べ た い 場 合 に は , 乱数 を 使っ て 並べ 替え れ 
ば よく , ここ で は シャ ッ フ ル (shuHe) と いう こと に する . 
並べ 替え に は 小さ い 値 の ほう が 前 に 来る 昇順 と 、 大 きい 値 の ほう が 前 に 来る 降順 が 
ある が , ここ で は すべ て 昇順 に 並べ る 方 法 で 説明 を する . 

ソー ト に は アル ゴリ ズム が 簡単 な 方 法 と し て . バブ ルソー ト , 選択 ソー ト , 挿入 
ソー ト な ど が ある . これ ら の 方 法 で は , 並べ 替え が 済ん だ 後 , 同じ 値 を も つ 複 数 の 
デー タ の 順番 が , 並べ 替え を 行う 前 と 入れ 替 わ ら な いよ うに する こと が で きる . そこ 
で , この こと を 安定 な アル ゴリ ズム で ある と いう . し か し , 所 要 時 間 は デー タ の 数 ヵ 
の 2 乗 ヵ 2 に 比例 (O( ヵ 2)) し , 高速 で は な い . 一 方 , 高速 な アル ゴリ ズム と し て 橋 ソ ー 
ト , シェ ルソー ト , クイ ッ ク ソ ー ト , ヒー プ ソ ー ト , マー ジ ソ ー ト な ど が あり , これ 
ら は 安定 な アル ゴリ ズム で は な い が , 所 要 時 間 は ヵ logz ヵ に 比例 (O(xlog ヵ )) し , 高速 
で ある . 安定 な 方 法 で は , 値 を 隣 同士 で 1 個 ず つ 順 次 比較 し て 並べ 替え て いく が , こ 
れ ら の 方 法 で は , デー タ 全 体 を 扱い な が ら , より 小さ い 値 を 前 方 に より 大 きい 値 を 
後方 に 移し て いき , 最終 的 に 昇順 に 整列 きせ る の で , 同じ 値 の デー タ の 順番 が 入れ # 
わる こと も あり , 不安 定 で ある . その ほか に , 分 布 数 え ソ ー ト (counting sort) , 逆 写 
像 ソー ト (inverse mapping sort). ラディ ックス ソー ト (radix sort) な ど , 制限 は ある 
けれ ども 高速 な 方 法 も ある が , 扱わ な いこ と に する . 

ソー ト を する た め の デ ー タ を 作る に は , シャ ッ フ ル が 必要 で あり , まず ,。 シャ ッ フ 
ル か ら 始 め る . 



















































































































































































シ ジ シャッフル 






































多く の プロ グラ ミン グ 言 語 で , 範囲 [0,1) に 一 様 に 分 布 す る 擬似 乱数 を 返す 関数 が 
日 意 され て いる . 図 2.1 は 0 か ら 9 まで の デー タ が 昇順 に 並ん で いる 配列 4 (o 印 ) と , 
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で ( 


1234567 

















図 2.1 秩序 ある デー タ o 印 と シャ ッ フ ル 後 の 無秩序 
あり , 縦 軸 は 各 配 列 要素 に 与え られ て いる 値 で ある . 





2.1 シャ ッ フ ル 11 





89 i 


な デー タ x 印 . 横 軸 は 配列 添字 の 番号 で 
(Z02_01_shufe.java) 


乱数 を 使っ て それ を ラン ダム な 順番 に シャ ッ フ ル し た 後 の 配 列 。(x 印 ) の 図 で ある . 


























横 軸 は 配列 添字 の 番号 で あり , 縦 軸 は 各 配 列 要 素 に 与え られ て いる 値 で ある . 
プロ グラ ム (Shufe.java) の メソ ッ ド (shufe) の 一 部 と . その 説明 は 以下 の と お り で 
ある . 


8hufe.java の メソ ッ ド (shufe) の 一 部 : 


1 for (int ]=n-1: ]j>0: j--) { 
im= 0: 

3 rm= エ [im] : 

4 for (int 1=1: 1<=]: ュ ++) t 

5 if (rm<r[i]) { 

6 iD 三陸 時 

7 ェ m= [im] : 

8 + 

9 + 

10 r[im] = r[]] : 

11 r[]]= rm: 

ゆめ aw= a[im] : 

13 alim]= a[]j] : 

14 a[]]= aw: 





1. 配列 as の 要素 に は , ある 順序 で デー タ が 与え られ て お り , a と 同じ 要素 数 n の 配 














列 + の 要素 に は , すでに , 範 














0,1) の 乱数 の 値 が 代入 され て いる と する . 


2. 上 の プロ グラ ム の 部 分 で は その 乱数 の 値 を キー と し て 配列 + を 昇順 に ソー ト し , 
それ に 連動 させ て 対応 し て いる a の 要素 を 並べ 替え る . + の 値 は ラン ダム に 並ん 





で いる か ら , それ を ソー ト す れ ば 


3. Ll て 15 ~: 添字 番号 が 」 以 下 の r 




















,a の 値 は ラン ダム に 並ぶ . 
で の 最大 値 探 し を 繰り 返 サ ルー プ で ある . r の 











最大 値 に 対応 する a の 値 が L14 で aljl の 値 と な る . 











4. L2: im に 最大 値 の 添字 番号 の 初 





期 値 0 を 代入 する . 








> 


プロ グラ ム の 行 番号 ヵ を Lz で 表す . 
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替え を 行う . 
9. L15: ルー プ が 済む と , 
で いる . 


L3: rm に 最大 値 の 初期 値 0] を 代入 する . 

L4 で 9: j 以下 で 最大 値 を 探す ルー プ で ある . 

L5 て 8: も し rm より 大 きい 値 と 出会っ た ら , im, rm の 値 を i, r 還 の 値 に 変え る . 
L10 て 14: 最大 値 の rlim] と rl の 要素 の 入れ 替え と , それ に 連動 し て a で の 入れ 























配列 は 昇順 に 並び , 配列 a の 要素 の 値 は 無秩序 に 並ん 














ソー ト の 説明 は , 2.3 節 以 降 で 行う . 


2.2 最大 値 








昇順 に ソー ト す る 例 は 前 節 で すでに 扱っ て いる . 昇順 に ソー ト す る 場合 で も , 小さ 


な 値 を 探し て 前 か ら 並 べ る 方 法 と , 

















大 き な 値 を 探し て 後ろ か ら 並 べ る 方 法 が 考え られ 








る が , ここ で は 後者 を 使う こと に する . そこ で , 一 組 の ヵ 個 の デー タ を も つ 配 列 sa の 

















中 の 最大 値 を 求め ある こと か ら 始 め る . ソー ト に は いろ いろ な 種類 が ある よう に , 最大 











値 を 求め る 方 法 も いろ いろ 考え られ る . 最も 簡単 な 方 法 は , 次 の 方 法 で あろ う . 
プロ グラ ム (Maximum.java) の メソ ッ ド (maximumA) の 一 部 と , その 説明 は 以下 の 


と お り で ある . 





Maximum.java の メソ ッ ド (maximumA) の 一 部 : 


1 for (int =1: 1i<n: ユ ++) て 
2 if (ali-1]>a[i]) { 

3 aw= a[i-1] : 

4 a[i-1]= a[ ュ ] : 

5 ali]= aw 

6 か 

7 有 

















配列 a の 要素 に は ある 


E 順 診 の デー タ が 与え られ て いる . 


上 の プロ グラ ム の 部 分 で は 配列 の 値 を キー と し て 配列 a を 昇順 に 並べ 替え る . 


1 
2 
3. L1 へ 7: 配列 の 最前 か ら 
4 











順に 最大 値 を 探す ルー プ で ある . 


L2: 現在 の 配列 の 値 と 次 の 配列 の 値 を 比較 する . 現在 の 配列 の 値 の ほう が 大 き 
か っ た ら L3 へ 5 で 入れ 替え る . 





L5: ail に 退避 し て ある 
L7: ルー プ が 済む と aln 


9 の 








L3: ai 一 1| の 値 を aw に 退避 する . 
L4: ali-1] に a 団 の 値 を 代入 する . 


aw の 値 を 代入 する . 


ー1] に は 最大 値 が 代入 され て いる . 


この 方 法 を "maximumA” と 名 付け て お く . 
最大 値 を 取り 出す だ け な ら , ali-1]>a 還 の 場合 に デー タ の 入れ 替え を する の は 無 意 
味 で ある . そこ で , 次 の よう に 少し 改良 を し て みる . 























2.3 バブ ルソー ト 


Maximum.java の メソ ッ ド (maximumB) の 一 部 : 


1 int imax= 0: 

ウ doubl]e amax= a[imax] : 

3 for (int =1: 1<n: ++) て 
4 if (amax<a[i] ) { 

5 1max ニ 1 ュ : 

6 amax= a[imax] : 

7 + 

8 が 











L1: 最大 値 の 添字 番号 imax を 0 に 初期 化す る . 

















L3 て 8: 配列 の 前 方 か ら 順 に 最大 値 を 探す ルー プ で ある . 
L4: 次 の 配列 と 比較 する . 


CE OR KO 性 


代入 し , その 値 を amax に 代入 する . 
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L2: 最大 値 を 代入 する 変数 amax を 定義 し , alO] を 初期 値 と し て 代入 する . 


L5, 6: 次 の 配列 が それ まで の 最大 値 よ り 大 きか っ た ら , その 添字 番号 を imax に 


6. L8: ルー プ が 済む と amax に 最大 値 が , imax に 最大 値 で ある a の 添字 番号 が 代 


入 さ れ て いる . 


この 方 法 を "maximumB” と 名 付け て お く . 
希 2.2 は 0 て 9 の 値 の デー タ が 無秩序 に 並ん で いる 配列 a を > 印 で , 探し 出 
値 amax を 座標 (0, amax) に o 印 で し た 図 で ある . 












































a[i] 





〇 つ 一 ト う うぅ う - 中 くく 〇 うー」 で ら 


0123456789 i 








2.2 無秩序 な デー タ x 印 と 最大 値 o 印 横 軸 は 配列 添字 の 番号 で あり , 縦 軸 は 各 配 列 要 
素 に 与え られ て いる 値 で ある . 最大 値 は 座標 (0. amax) の o 印 で ある . (Z02.02-maximum. 








java) 


2.3 バブ ルソー ト 








バブ ルソー ト は , 最も 単純 な ソー ト で あり 安定 な アル ゴリ ズム で ある . その 中 で も 
単純 な 方 法 は , “maximumA” を ヵ ー1 回 繰り 返す 方 法 で ある . 2.3 は 1 て 10 の 値 が 

















ラン ダム に 並ん で いる 配列 sa の デー タタ を, バブ ルソー ト を 使っ て 昇順 に 並べ # 

















えて い 
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2 3 4 なき 衣 す 8.:9 


Din ロロ 





図 2.3 バブ ルソー ト の 過程 . i は 配列 a の 添字 番号 , ai は 要素 の 値 , 縦 に 振っ て ある 数 字 
は 最大 値 を 求め る 何 番目 の 操作 か を 示す 数 で ある . 

















る と ころ で ある . 1 回 目 は , alO] と al| の 値 を 比較 し て , alO] の 値 の ほう が 大 きか っ 
た ら 値 を 入れ 替え , 順次 右 に 進み al8] と al9] の 処理 を 行う . 2 回目 以降 の i 回 目 で は , 
aln-i] の 後 は すでに より 大 きい 値 が 昇順 に 並ん で いる か ら , そこ まで 処理 すれ ば よく , 
最後 の nー1 回 目 は alO] と al1| の 値 の 処理 で 終わ らち せ て よい . 図 は 4 回 目 を 始め る と こ 
ろ で あり , al6] の 後 は すでに より 大 きい 値 が 昇順 に 並ん で いる . 4 回目 は , all] の 値 7 
が 右 に 進み , al6] の 値 5 と 入れ 替わっ た ら 終 わる こと に な る . 

プロ グラ ム (Sort_Bubble.java) の メソ ッ ド (sort_Bubble2) の 一 部 と , その 説明 は 以下 
の と お り で ある . 





























































































































Sort_Bubble.java の メソ ッ ド (sort_Bubble2) の 一 部 : 


1 5Rere (Gb 9mi05 OB に っ 工 
の for (int i=0: 1<]: ュ ++) { 
3 if (al[i]>a[i+1]) て 
4 Ei 己 ELilllg 

5 a[i] = a[i+1] : 
6 al[i+1]= am: 
+ 
8 + 

9 記 





Ll て 9: 最大 値 探 し を nー1 回 繰り 返す . 

L2^ て 8: 配列 の 最前 か ら } まで で 最大 値 を 探す . 

L3: 現在 の 配列 要素 a 財 の 値 と 直後 の 要素 ali+1] の 値 を 比べ る . 
L4 で 6: 直後 の 要素 の 値 よ り 大 きか っ た ら 入 れ 奉 える . 

L9: ルー プ が 終わ る と , 配列 a は 昇順 に な っ て いる . 























の Y 選 軸 打 








図 2.4 は 0 て 9 の 値 が ラン ダム に 並ん で いる 配列 a(oc 印 ) と . バブ ルソー ト を 使っ て 
昇順 に 並べ 替え た 配列 a (> 印 ) の 図 で ある . 

この 方 法 で は , 最前 の 値 あ から スタ ー ト し て , 大 きい 値 が 次 々 と 後 へ 進ん で いく 様子 
が 泡 が 上 に ボコ ボコ と 上 が っ て いく 様子 に 似 て いる , と いう こと で 泡 (bubble) ソー ト 
と いわ れる よう で ある . 以上 の バブ ルソー ト の 方 法 は 最も 単純 で ある が 無駄 も ある . 
プロ グラ ム (Sort_Bubble.java) に は , 他 に 二 つ の メソ ッ ド が ある か ら 参 照 し て ほし い . 
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上 どー いい のど ょ の の ーー」 コ OO< ら 





0123456789i 


図 2.4 ラン ダム な 配列 o 印 と バブ ルソー ト 後 の 配列 x 印 . (Z02.04_bubble.java) 


柳 ソ ー ト 





バブ ルソー ト の 改 
り 合 っ た も の 同士 を 


を 初め は 大 きく と り , 徐々 に 狭め て いき , 最後 に は . バブ ルソー ト と 同じ よう に , 隣 


り 合 っ た も の 同士 を 





良 版 で あり , 高速 で ある が 不安 定 で ある . バブ ルソー ト で は , 隣 





比較 し て ソー ト を 行っ た が , この 方 法 で は , 比較 する 要素 の 間隔 








比較 し て ソー ト を 終え る . 最初 の 間隔 は 要素 数 n を 1.3 で 割っ た 





整数 と し . 繰り 返し の た びに 間隔 を 1.3 で 割っ て , 徐々 に 小さ い 整 数 を 使う . 間隔 が 
小さ く な っ て きた ら , 11, 8, 6, 4, 3. 2. 1 と な る よう に 細工 を する と 効率 が 良い こと 


に な っ て いる . プロ 




















グラ ム (Sort_Comb.java) の メソ ッ ド (sort_-Comb) の 一 部 と . その 


説明 は 以下 の と お り で ある . 


Sort_Comb.java の メソ ッ ド (sort_Comb) の 一 部 : 


1 boo1ean Svwd: 
double sf= 1.3: 


う 3 nt ])h= n: 

4 do { 

5 Jh= (int) (jh/sf): 

6 if (jD == 0) jjt= 1: 

7 if (j ル ==9 || 地 == 10) jjh= 11: 
8 Swd= fa] se: 

9 int = 0: 

10 for (int ]=]jh: <n: j++) 【 
11 if (a[i]>a[]]) { 

12 aw= a[i] : 

13 ai]= a[]] : 

14 aj]= awi 

15 SWd= ニ TUG: 

16 + 

17 Ha 

18 # 


19 + gwhi]e ( jh>1 || swd): 
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1. L1: 入れ 替え が 起こ らち な か っ た ら 値 を false の まま に し て お く フ ラグ の 宣言 . 
2. L2: 比較 する デー タ の 間隔 幅 を 1.3 で 割っ て 狭め て いく 定数 sf 
3. L3: 比較 する デー タ の 間隔 幅 の 初期 値 で ある が , L5 で sf で 割ら れる . 
4. L4 へ て 19: 間隔 幅 を 狭め な が ら , 入れ 替え を 繰り 返す た め の 外 側 の ルー プ . 
5. L5: ji の 値 を 狭め る . 
6. L6: jh 一 0 に な っ た ら swd=false の まま L10 て 18 の ルー プ が 済む まで ルー プ を 繰 
り 返 す た め に 抽 ニ 1 と する . 
7. L7: j<=11 (10 また は 9) に な っ た ら , jiー11, 8, 6, 4, 3. 2、 1 と な る よう に す 
る た め に jj=11 と する . 
8. L8: 内 側 の ルー プ で , 入れ 替え が 起こ ちな か っ た ら , その こと を Ll19 で 知る た 
め に swd に 初期 値 false を 代入 し て お く . 
9. L9: 比較 を 行う 前 方 の 配列 の 添字 番号 を 初期 値 0 と する . 
10. L10 て 18: alO] と 比較 する 後方 の 配列 を al] とし, j が 最大 の nー1 を 超え る ま 
で 繰り 返す サル ー プ . 
11. L11: 前 方 の 配列 と 後方 の 配列 の 値 の 比較 を 行う . 
12. L12 て 15: 前 方 の ほう が 大 きか っ た ら 入 れ 奉 え を 行い 、 フラ グ swd に true を 代 
入 す る . 
13. L17: ルー プ が まわ る と き に , j だけ で な く i の 値 も 1 増やす 必要 が ある . 
14. L19: jh1 に な っ て お り , 入れ 替え も な く swd=false で あっ た ら 終 了 す る . 
2 5 選択 ソー ト 
単純 選択 法 と も いわ れ , 安定 で ある . 最大 値 を 求め る “maximumB” の 方 法 の 繰り 
返し で ある . まず , 要素 の 数 が n の 配列 。 の , alO] か ら aln-1| まで で 最大 値 alil を 探 


し , a 財 と alin-1| の 値 を 入れ 替え る . 次 は , aln-1| に は 最大 値 が 入っ て いる か ら , こ 
れ を 抜か し て al[0] か ら aln-2] まで で 最大 値 を 探し , aln-2] の 値 と 入れ 替え る . この 処 
理 を ヵ ー1 回 繰り 返せ ば 終わ り と な る . プロ グラ ム (Sort_Select.java) の メソ ッ ド (sort 
-Select) の 一 部 と , その 説明 は 以下 の と お り で ある . 





Sort_Select.java の メソ ッ ド (sort_Select) の 一 部 : 


〇 0 の 中 の DD は 


は ロビ 
hND は の 
トー) 


for (int ]=n-1: ]j>0: ]j--) { 


1max= 0: 
amax= a[imax] : 
for (int i=0: 1 く <]: ュ ++) { 
if (amax<a[i+1]) { 
1max= ュ +1・: 
amax= a[imax] : 
+ 
+ 
a[imax]= a[]] : 
al]]= amax: 


2.6 
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1. L1 へ て 12: nー1 回 繰り 返さ れる 外側 の ルー プ で あり , j は 下 の ル ー プ で の 最大 値 を 
代入 する 添字 番号 で ある . 

L2, 3: まず , alO] が 最大 で ある と 仮定 する . 

L4 て 9: 0 か ら j-1 まで で 最大 値 を 探す ルー プ . 

L5: 現在 の 最大 値 と 次 の 値 を 比較 する . 

L6, 7: 次 の 値 の ほう が 大 きか っ た ら , 最大 値 の 位置 と 値 を 変更 する 

L10, 11: 内 側 の ルー プ が 終わ り , その 時 点 で の 最大 値 の 。 と 最後 の a の 値 を 入 
れ 替 える . 

7. L12: ルー プ が 終了 する . 
































の の F の 96 





挿 人 ソー ト 











単純 挿入 法 と も いわ れ , 安定 で ある . 配列 a の 要素 の 数 は n と する . 最初 に all] の 
値 を 変数 xw に 代入 し , al0] の 値 と 比較 する . alOl>xw で あっ た ら alO]| の 値 を al] に 移 
し , xw を al0| に 代入 する . 次 に 一 つ 右 の al[2| か ら 始め , まず al2] を 変数 xw に 代入 
し て al| の 値 と 比較 し , alll<xw で あっ た ら そ こ で や め る . そう で な か っ た ら alll の 
値 を al2| に 移し , 一 つ 戻 っ て xw と al[O| の 値 を 比較 する . alOl<xw で あっ た ら そ こ で 
や め て xw を all| に 代入 し . そう で な か っ た ら alO] の 値 を all| に 移し xw を al0] に 代 
入 す る . さら に 進ん で , ai の 値 を xw に 代入 し , xw と -1] の 値 と の 比較 か ら 始 め 
る と ころ まで 進ん だ ら , j の 値 を 1 ずつ 減ら し て 調べ て いく . ah-1] 以前 は すでに 昇順 
に 並ん で いる か ら , ai<xw と な る 値 を も つ aiil と 出会う まで は ail の 値 を ahi 二 1] に 移 
し , 出会っ た な ら そ こ で や め て よい . この こと を aln-1| と alIn-2] と の 比較 か ら 始 め る 
処理 が 終わ る と ころ まで 繰り 返せ ば ルー プ が 終わ り と な る . 

較 2.5 は 1 へ 10 の 値 の デー タ が 無秩序 に 並ん で いる 配列 as を , 挿入 ソー ト 法 を 使っ 
て 昇順 に 並べ 替え る 過程 を 示す 図 で ある . 最初 の 過程 は all]=10 と alO|=5 の 比較 で 
あり alO]<a[1] で ある か ら 取 り 替 え は 行わ な い の で , 点線 の 矢 で 示し て ある . 2 番目 の 
過程 で は , al2| の 値 3 が a[0| まで 移さ れる . 3 番目 の 過程 で は , al3] の 値 7 は al2] ま 



















































































ーー イー イー ナー ト 














2.5 畠 入 ソー ト の 過程 . i は 配列 a の 要素 の 番号 , al は 要素 の 値 , 縦 に 振っ て ある 数 字 








は 何 番目 の 操作 か を 示す 数 で ある . 実線 の 矢印 は 要素 の 入れ 替え の ある 部 分 で あり , 点線 の 
矢印 は 入れ 替え の な い 部 分 で ある . 
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で 移さ れ , al1| の 5 より 大 きい の で , そこ で や め る . 挿入 ソー ト と いう 言葉 は , この 
過程 に お ける 最小 値 を . より 小さ な 値 に 出会っ た と ころ に 挿入 する と いう 意味 で あ 
ろう . 同じ よう な 操作 を 9 番目 の 過程 まで 行え ば 終了 する . プロ グラ ム (Sort_Insert. 
java) の メソ ッ ド (sort_Imsert) の 一 部 と . その 説明 は 以下 の と お り で ある . 
































Sort_Insert.java の メソ ッ ド (sort_Imsert) の 一 部 : 









































1 doub]1e xXVW: 
2 for (int ]j=1: ]<n: j++) { 
思 xw= a[]] : 
4 se (1 三 ] に に 19 5 有三 0』 = っ ) 
5 if (al[i]>xw) { 
6 a[i+1] = a[ ュ i] : 
7 } else て 
8 break: 
9 + 
10 + 
M| a[i+1] = xw: 
I ウ + 
1. L1: 変数 xw を 定義 し . これ に 最小 値 を 代入 し て , それ より 大 きい 値 は 一 つ 後 へ 
移す . 
2. L2 て 12: 最小 値 を 指定 する 外側 の ルー プ で , n-1 回 繰り 返す . 
3. L3: j より 前 は 整列 し て お り , 次 に 考慮 する 最小 値 の 初期 値 は aljl で ある . 
4. L4 て 10: 最小 値 と し た j よ り 前 を 調べ る 
5. L5: a 財 と 現在 の 最小 値 xw を 比較 する 
6. L6: al の ほう が 大 きか っ た ら a 財 の 値 を 一 つ 後ろ の 要素 に 移す 
7. L8: 最小 値 よ り 小 さい 値 に 出会っ た ら , それ 以前 は 昇順 に 整列 し て いる か ら , そ 
こ が 今 回 の 最小 値 の 位置 と な り , ルー プ を 終え る . 
8. L10: L4 の ルー プ の 終わ り に 達する か , L8 が 実行 され る と ルー プ が 終わ る . 
9. L11: 最小 値 を 整列 の 中 の し か る べき 位置 に 挿入 する 
10. L12: ルー プ が 終わ る と , 配列 a は 昇順 に な っ て いる . 
と 76 シェ ルソー ト 




















を 比較 し て ソー ト を 行っ た が , バブ ルソー ト を 改良 し て 杜 ソ ー 











挿入 ソー ト の 改良 版 で あり , 不安 定 で ある . 挿入 ソー ト で は , 隣り 合っ た も の 同士 


と し た よう だ, こ 


の 方 法 で も , 比較 する 要素 の 間隔 j を 要素 数 m の 1/9 程度 の 大 き さ に し て 挿入 ソー 
ト を 始め る . その 後 , 間隔 jh を 1/3 ずつ 狭く し て ソー ト を 繰り 返し , 最後 は 間隔 を 
j 抽 =1 に し て 単純 皇 入 ソー ト を 行う . 昇順 の ソー ト は , 値 の 小さ な デー タ を 左 に , 大 き 
な デー タ を 右 に 移す こと で あり , シェ ルソー ト で は , 間隔 が の 大 き さ で 行わ れる 
か ら , 全体 で の 処理 数 が 少な く て 済む よう に な る . 間隔 を 開け て ソー ト す る の で , 同 
じ 値 の 要素 の 順番 が 入れ 替わっ て し まう こと も あり , この 方 法 は 安定 で は な い . プロ 
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グラ ム (Sort_Shell.java) の メソ ッ ド (sort_Shell) の 一 部 と ,、 その 説明 は 以下 の と お り で 


ある . 


Sort_Shell.java の メソ ッ ド (sort_Shell) の 一 部 : 


は は 
の の 〇 Co ココ の 中 の OMD は は 


は は は は は は ロー 
oO の の 喉 の いい 


doub]1e xi 
1nt ]h= 13: 
whi1e (jh<n) jh= 3*jh+1: 
Jh /= 9: 
whi1e (jh>0) + 
for (int ]j=0: ]<n-jh: j++) て 
xw= a[]j+]h] : 
for (=]: 1>=0: 1-=]jh) 
if (al[i]>xw) { 
ali+jh] = a[i] : 





















































ナ ese { 
break: 
+ 
+ 
ai+jh] = xw: 
過 
Jh /=3: 
+ 
L1: 変数 xw を 定義 し , これ に 代入 する 最小 値 よ り 大 きい 値 は 入れ 替え て 後 へ 
移す . 
L2: jh の 間隔 幅 ず つ 離 れ た デー タ を 同じ 組 と し て 処理 する . 全体 を jh 組 に 分 け 
て , それ ぞ れ で 挿入 ソー ト を 行う こと に な る . 
L3, 4: jh の 初期 値 を 要素 数 n の 1/9 程度 の 大 き さ に する . 
L5 て 18: 幅 jh が ゼロ に な る まで 繰り 返す . 
L6 て 16: 最小 値 を 指定 する 外側 の ルー プ で n-jh 回 繰り 返す . 
L7: 最小 値 を 指定 する . 
L8 て 14: 各 組 の 中 で 処理 する た め に , -jh ずつ ずら し て 繰り 返す 
L9: a 国 と 最小 値 を 比較 する . 
L10: a 財 の ほう が 大 きか っ た ら a 財 の 値 を 同じ 組 の 一 つ 後 ろ に 代入 する . 
L12: 最小 値 よ り 小 さい 値 に 出会っ た ら , それ 以前 は 昇順 に 整列 し て いる の で , 
そこ が 最小 値 の 位置 と な り , ルー プ を 終え る 
L14: L8 の ルー プ の 終わ り に 達する か , L12 が 実行 され る と ルー プ が 終わ る . 
L15: 最小 値 を 整列 の 中 の し か る べき 位置 に 挿入 する . 
L17: 幅 を 3 で 割り , 切り 捨て て 整数 化 を する . j 辿 が 1 で の 処理 が 済み jh が 
ゼロ に な る まで 繰り 返す . 
L18: ルー プ が 終わ る と , 配列 a は 昇順 に な っ て いる . 














グイ ツク グ ツ ソー リド 





クイ ッ ク ソ ー ト は 一 般 的 に は 最も 高速 な 方 法 で ある . 不安 定 で ある . メソ ッ ド が 呼 


ば れる と , まず , デー タ の 中 で 平均 値 に 近い 適当 な 値 を 関 
値 な ど は わか ら な いか ら , 配列 の 
左 の 端 の 要素 か ら 順 に z。。 より 大 きい 値 z, を も つ 要 素 1 

















央 の 要素 al(1Tr)/2] の 








値 。 に 選ぶ . 普通 は 平均 
値 を z。 と する . デー タ の 














を 見 つけ る . 次 に , デー タ 














の 右 の 端 の 要素 か ら 順 に ヵ 。 より 小さ い 値 z.。 を も つ 要 素 1 個 を 見 つけ , それ ぞ れ の 
値 z, と z。 と を 入れ 奉 え 、z,』。 より 小さ い 値 は 左 に , 大 きい 値 は 右 に 集まる よう に す 














る . 

































































是 び , 左側 で は 7 を 1 ずつ 増やし な が ら , z。 より 大 きい 値 z, を 見 つけ , 右側 で 








は r を 1 ずつ 減ら し な が ら , z。 より 小さ い 値 z. を 見 つけ , ヵ , と zz. と を 入れ 替え る . 


その 際 , 1]>=r と な っ て いた ら , 
値 は 左側 に 集め られ て いる . 次 に , 左右 


























すでに , z 放 より 大 きい 値 は 右側 に , z。。 より 小さ い 
側 の デー タ の 各 組 に つい て , それ ぞ れ , こ 








の メソ ッ ド の 再帰 呼び 出し を 行い それ ぞ れ の 要素 を 大 小 の 二 組 に 分 割 す る . それ ぞ 


れ の 組 の 要素 の 数 が 11 
の 要素 が 1 個 




















固 に な っ た ら , 

















ずつ に な っ た ら , それ ら は , 3 




















生 帰 呼 び 出 し か ら 戻 り , 先 に 進む b.、 すべ て の 組 
ル ん で いる . プロ グラ ム (Sort 











_Quick.java) の メソ ッ ド (sort_-Quick) の 一 部 と . その 説明 は 以下 の と お り で ある . 


Sort_Quick.java の メソ ッ ド (sort_Quick) の 一 部 : 


1 
2 
3 
4 
5 
6 
7 
8 
回 


10 
11 
12 
13 
14 
15 
16 


doub1e[] a) { 
doub1e xm= a[(1+ ェ ) /2] : 
doub1e awj 
1nt 1W= ] , TW ニ = エ : 


半 値 より 小さ い 値 は 左 へ , 大 きい 値 は 右 へ 並べ る 


sose (( 8 お )) 
whi]e (a[1w] <xm) 1++: 
Whi1]e (xm<a [rw] ) rwー-: 
if (1w<rw) て 
aw= a[1v] : 
a[1w] = a[rw] : 
a [rv] = ay: 
1W++: 
ia ニー6 
} e1se 
break: 
が 
記 


if (1<1w-1 ) sort_Huick(1 , 1W-1 , a) : 
ュ f (rw+1< エ ) sort_Huick(rw+1 , て 。 a) : 











pub1ic void sort_Nuick(fina] int 1, fina] int エ , 


L1, 2 て 22: メソ ッ ド sort_Quick の 定義 で ある . 配列 as と 、 その 中 で ソー ト す る 
部 分 の 左端 1 と 右端 + を 引数 と する . 
L3: デー タ を 左右 に 分 ける 団 値 と し て 





F 央 近く の 値 を 指定 する . 
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L5: 左端 と 右端 の 添字 番号 を 変数 lw と rw に コピ ー す る . 

L7 て 19: 半値 より 小さ い 値 は 左 に , 大 きい 値 は 右 に 並べ る ルー プ で あり , 仕分 け 
が 済む と L17 の break 文 で ルー プ を 抜け 出す . 

L8: 左端 か ら 調 べ , 関 値 よ り 小 さけ れ ば 変数 Ilw に 1 を 加え る こと を 繰り 返し , 
半値 より 大 きけ れ ば 右側 に 移す た め に 次 に 進む . 

L9: 右端 か ら 調べ , 関 値 よ り 大 きけ れ ば 変数 rw から 1 を 引く こと を 繰り 返し , 
関 値 よ り 小 さけ れ ば 左側 に 移す た め に 次 に 進む . 

L10: 左端 変数 lw と 右端 変数 rw を 比較 する . 

L11 て 15: 左端 変数 lw が 右端 変数 rw より 小さ けれ ば , 処理 は 済ん で いな いか 
ら , 左側 の 大 きい 値 と 右側 の 小さ い 値 を 入れ 奉 え , 変数 値 hw と rw の 値 を 1 ず 
つ 増 減 す る . 

L17: 左端 変数 lw が 右端 変数 rw より 小さ く な けれ ば , 処理 が 済ん で いる の で , 
ルー プ を 終え る . 

L20: 左側 に デー タ が まだ 複数 あれ ば 再帰 的 に ソー ト を する . 

L21: 右側 に デー タ が まだ 複数 あれ ば 再帰 的 に ソー ト を する . 

L22: 再帰 呼び 出し で の 終了 の 場合 に は 呼び 出し 元 に 戻り , 最初 の 呼び 出し の 処 
理 で ここ まで 来る と 。 すべ て の ソー ト が 終わ っ て いる . 



































































































































図 2.6 は 1 て 10 の 値 の デー タ が 無秩序 に 並ん で いる 配列 。 の 値 を . クイ ッ ク ソ ー ト 
に よっ て 昇順 に 並べ 替え る 過程 を 示す 図 で ある . 最初 の 過程 は z,。 = 4 が 関 値 で ある 
か ら , まず , 左端 の 5 と 右 か ら 2 番目 の 2 が 入れ 奉 わ る . 続い て 10 と 1, 最後 に 7 と 
4 が 入れ 替わる . 2 番目 の 過程 で , 左側 の 部 分 で は z。。 = 1 で ある か ら , 2 と 1 が 入れ 
替わる だ け で 終わ り , 右側 の 部 分 の 処理 に 進む 前 に 左側 で 先 へ 進む . 3 番目 の 過程 で , 
左端 の 部 分 の 要素 は 1 個 し か な いか ら , その まま で 右 隣 の 部 分 の 処理 に 移る . この 部 
分 の 処理 が 全部 済む と , 2 行 目 の 右 半 分 に 進み ,z。= ニ 6 を 賠 値 と し て 処理 を 行う . 同 
様 の 操作 を 繰り 返し て , 1 行 目 に 戻っ て くる まで 処理 を 行う . 
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1 (3⑬) 


2.6 クイ ッ ク ソ ー ト の 過程 . i は 配列 a の 添字 番号 , ail は 要素 の 値 で ある . 行 の 途中 に あ 
る 数 値 は デー タ を 左右 に 分 ける 賠 値 z。。 で ある . 縦 の 実線 は , 配列 が 2 分 割 さ れ た と き の 


境 で ある . 








22 


2.9 
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この 方 法 も 高速 で ある が , 不安 定 で ある . 図 2.7 の 左右 の 図 は , 実際 の 木 と は 上 


下 が 逆 で ある が , それ ぞ れ が 木 構造 


根 (root) の て ⑨ は 節 (nod) , 


0 党 ん いる 線 は 校 (branch) と いわ れる . 


下 に ある 節 や 葉 の 親 で ある . こ 





左 図 の 数 字 は 配列 添字 の 番号 で ある . 
番号 が ? の 節 の 子 の 番号 は 27 と 22 二 1 と な り , 
その 親 の 番号 は 7/2 と な る (単純 に 整数 化す る と き は , 
親子 関係 が 明解 に な る . そこ で , 




















号 を 0 か ら 始 め る こと に する 




















と は 堆積 で ある が , ヒー プ ソ ー 
れ の 子 の 値 が 自分 の 値 よ り 小 さ 
て いる と いわ れる . 





















































(tree) を な し て いる と いわ れる . 左 図 で ① は 


⑥ ~ ⑩ は 下 に つなが ら ず 先端 で ある か ら 葉 (1eaf) , 














各 節 は , 上 に ある 根 や 節 の 子 で あり , 


の 図 の よう に , 根 や 節 の 下 で 2 本 の 枝 に 分 か れ て いる 
木 は 2 分 木 (2 進 木 ) と いわ れる . 














右 図 の 数 字 は 各 配 列 要 素 の 値 で あり , 1 て 10 の 値 が 代入 され て いる . ヒー 


添字 番号 を 0 か ら で は な く 1 か ら 始 め る と 
逆 に 子 の 番号 7 が 偶数 で も 奇数 で も , 
小数 は 切り 捨て られ る ) の で 
説明 文 で は 添字 番号 を 1 か ら 始 め , java で は 添字 番 





プ (heap) 


ト の 場合 に は すべ て の 根 あ る い は 節 に つい て , それ ぞ 
く な る よう に 配置 され て いる 場合 に .。 ヒー プ を 構成 し 




















ヒー プ ソ ー ト の 処理 は , 大 別 す る と 二 つ の 処理 に 分 けら れる . 














ロ 第 一 は , 全 デ ー タ ( 石 図 ) を 使っ て ヒー プ を 作る こと で ある . ヒー プ を 作る 処 


























索 @。/2 左 図 の ⑤ ) か 











配列 要素 の 添字 番号 を 
タ の 入れ 替え が あり , 
か ら 下 は , ヒー プ を 構 





























位 処理 を 繰り 返し て いく 





図 2.7 ヒー プ ソ ー ト の 木 構造 . 要素 数 
ある . 右 図 の 数 字 は 各 配 列 要素 の 値 で あ 
ソー ト す る こと に な る . 




















理 の 最小 の 単位 処理 は , 

















プ を 作る に は , 親 で ある ( 葉 で は な い ) 


























親 と 左右 の 子 の デー タ 3 個 (右側 の 子 が な い 場 合 は 2 
個 ) の うち 最大 の デー タ を 親 の デー タ と する こと で ある . 配列 。 の 全 デ ー タ 
1 "> ks を 使っ た ヒー 最後 の 配列 要 
ら 単 位 処理 を 行う それ が 済む と , この 場合 


で ある か ら 人 孫 は な く , 親 。。,。 か ら 下 は ヒー プ と な っ て いる . 以後 , 親 に する 


。 子 は 葉 


1 ずつ 減ら し な が ら 単 位 処理 を 行う が , 親 と 子 の デー 
し か も 孫 が ある 場合 に は , 親 の デー タ が 代入 され た 子 


成 し て いる と は 限ら な い の で , それ を 親 と 


し て 下 へ 単 

















必要 が ある . 最後 に 親 が 。」 の 場合 の 処 





時 が 済め ば , 


が 10 の 配列 を 扱う . 左 図 の 数 字 は 配列 添字 の 番号 で 














り , 1 へ 10 の 値 が 代入 され て いる . この 右 図 の 数 値 を 
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全 デ ー タ が ヒー プ を 作っ て いる . 

ヒー プ が 完成 する と , 根 の 位置 z。 に は 必ず 最大 値 ( 右 図 の 10) が ある か ら , 
それ と , 配列 の 最後 の 要素 cr。 の 値 ( 右 図 の 1) と を 入れ 替え る . 最大 値 が 配 
列 の 最後 の 要素 に 移り , 最大 値 で な いも の が 根 の 位置 に 移る . そこ で , 配列 
の 最後 の 要素 を 除外 し た 要素 全体 ( 右 図 で 9 個 ) で 。」 を 親 と し て ヒー プ を 作 
りな お し , 再び , 根 と 配列 の 最後 の 要素 g。 と を 入れ 替え る . この 処理 を 2 個 
の 要素 だ け で の 処理 が 済む まで 繰り 返す と , 配列 の 要素 全体 が 昇順 に 並ん で 
お り , ソー ト が 終了 する . 






























































プロ グラ ム (Sort_Heap.java) の メソ ッ ド (sort_Heap) の 二 つ の 部 分 と . それ ぞ れ の 説 
明 は 以下 の と お り で ある . 


8ort_Heap.java の メソ ッ ド (sort_Heap) の 一 部 : 


CC 0QO へ の 中 の 〇 DD は ロビ 


ユ 
【o】 


for (i=n/2: 1>=1: ュー-) て 
heap(1, n, a): 
が # 
while (n>1) { 
回 
aw= a[n] : 
a[n]= a[O] : 
a[0]= av: 
heap(1, n, a): 


1. L1 へ 3: 全 デ ー タ の ヒー プ を 構成 する た め に , 最後 の 親 か ら 根 まで の 部 分 的 な 
ヒー プ を 繰り 返し 作っ て いく . 最後 の 親 は n/2 番目 の 要素 aln/21] (= g,/。) で 
ある . 

2. L2: i 番 目 の 要 素 を 親 と し て , それ 以下 n 番目 の 要素 まで で 必要 な 要素 を 使っ て , 
部 分 的 な ヒー プ を 作る メソ ッ ド heap を 呼ぶ . 

3. L3: 根 か ら 下 の ヒー プ が 完成 し た ら ル ー プ を 抜け る 

4. L4 て 10: ソー ト を 行う . ソー ト さ れ て いな い 要 素 の 数 が 1 に な る (ソー ト が 済む ) 
まで ルー プ を 繰り 返す . 

5. L5: 現時 点 で の 最後 の 要素 以後 は ソー ト さ れ た の で , 次 の 処理 か ら は ず す た め , 
要素 数 mn を 1 減ら す . 

6. L6^s: 根 alO] と 現時 点 で の 最後 の 要素 aln] の 値 を 入れ 替え る . 次 の 処理 は al 
an 一 1] の ? ヵ 個 で 行う . 

7. L9: その 最後 の 要素 aln] 以前 で ヒー プ 作 り を 繰り 返す 

8. L10: 残さ れ た 要素 の 数 が 1 個 に な る と , 全体 が ソー ト さ れ て いる か ら , ソー ト 
が 終了 する . 

















































































































8ort_Heap.java の メソ ッ ド (heap) : 


1 
2 
3 
4 


pub1ic void heap(int 1, int n, double[] a) { 
doubl]e aw= a[i-1] : 
1nt ]=1*2: 
whi1e (] <= n) 
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5 if (j<n &&z a[j-1]<a[]]) て 
6 j++: 
7 ま ょ 
8 if (a[]j-1]>aw) 
9 a[i-1]= a[j-1] : 
10 員 三 革 
ili 張 指 旨 : 
12 } else て 
中 8) break: 
14 + 
15 + 
16 a[i-1]= aw: 
i07 jj) 
1. L1 て 17: メソ ッ ド heap の 定義 で ある . 引数 の 配列 as の i 番 目 か ら n 番 目 ま で の 
デー タ で ヒー プ を 作る 
2. L2: 処理 の 先頭 の i 番目 の 要素 を 親 と する . 
3. L3: 左側 の 子 ( 諾 子 ) は 2 番目 で ある . 
4. L4 へ て 15: 子 の 番号 が n を 超え て いた ら 終 わる 
5. L5: 右 子 が お り , その 値 が 左 子 の 値 よ り 大 きけ れ ば , 
6. L6: 右 子 を 親 と 比較 する た め j の 値 を 1 増やし て , 右 子 の 番号 に する . 
7. L8: 大 きい ほう の 子 の 値 と 親 の 値 を 比較 する . 
8. L9: 親 よ り 大 きけ れ ば 親 に その 子 の 値 を 代入 する . 
9. L10: 次 に , これ まで の 左 子 を 親 に し て さら に 子孫 に 進む . 
10. L11: 新しい 左 子 の 番号 を j」 に 代入 する . 
11. L13: 親 が 子 よ り 大 きか っ た ら , それ 以下 は すでに ヒー プ を 形成 し て いる か ら 
while の ルー プ を 抜け る . 
12. L15: 子 の 番号 が n を 超え た り , 親 が 子 よ り 大 きか っ た ら ル ー プ が 終わ る . 
13. L16: 最後 の 親 に 最初 の 親 の 値 を 代入 し て ヒー プ が 完成 する . 
14. L17: メソ ッ ド を 終え る . 
マー ジ 











ソー ト で は , 乱雑 に 並ん で いる 一 組 の デー タ を も つ 1 個 の 配列 を 処理 し て , ある 規 
則 に 従っ て デー タ の 整列 を 作っ て いる . 他方 .、 デ ー タ が すでに 整列 し て いる 複数 の 配 
列 を , 1 個 の 配列 に 整列 し た デー タ と し て 合併 する こと を マー ジ (併合 ) と いう . 図 2.8 
の o 印 の 左 5 個 は 配列 as で あり , 右 5 個 は 配列 b で ある . 図 の x 印 は , 配列 a と b を 
マー ジ し た 配列 < で ある . 

プロ グラ ム (Merge.java) の メソ ッ ド (merge) の 一 部 と ,、 その 説明 は 以下 の と お り で 
ある . 


















































図 2.8 2 


マー ジ し た 配列 c で ある . 





回 











の 配列 の マー ジ 





〇 一 ト う > くう の 1 の ) この OO (の 


0123456789 





. o 印 の 左 5 個 は 配列 a, 右 5 











(Z02.08merge.java) 


Merge.java の メソ ッ ド (merge) の 一 部 : 


(CC 0QO の の 喉 の ODM は 


は 
【o】 








四 





1nt 1a=O , 1b=O , 1c=0O : 
whi1e (ia<na & 科 1b<nb) { 
if (al[ia] <= b[ib]) { 

c [ic++] = a[ia++] : 


} else 


{ 


c [ic++] = b[1b++] : 


# 
了 


whi]e (ia<na) c[ic++] = a[ia++] : 
whi]e (ib<nb) c[ic++] = b[ib++] : 


1. Ll: 配列 ab, c の 添字 番号 を ゼロ に 初 有 
2. L2 て 8: 配列 a、 b の どちら か で , 添字 の 


L9 へ 移 


る . 





回 
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は 配列 b,、 x 印 は 配列 a と b を 














化す る . 
直 が 要素 数 を 超え た ら , ルー プ を 終了 し 


3. L3: 配列 a の 要素 の 値 alial と 配列 b の 要素 の 値 blib] を 比較 する . 


4. L4: alia 
増やす . 





5. L6: alia 
や す . 


の ほう が 大 きく な か っ た ら , alhial を 配列 要素 clic] に 代入 し て jia, ic を 1 


の ほう が 大 きか っ た ら , bj] を 配列 要素 clic] に 代入 し て ib, ic を 1 増 


6. L8: どちら か 片方 の 要素 が 終わ っ た ら ル ー プ を 抜け る . 
7. L9, 10: まだ 要素 が 残っ て いる ほう の 要素 を c に 追加 コピ ー し て 終了 する . 





2.9 は 整列 し た 配列 a と b を 配列 c に マー ジ す る 様子 を ボ し て いる . 初め に al 





の 2 と bIO] の 0 を 比較 し , 小さ い ほ う の 0 を cl[O] に 代入 する . 次 は , 残さ れ た alO] の 
2 と b[1| の 1 を 比較 し , 小さ い ほ う を c に 代入 する . この こと を 繰り 返し て , b[4| の 6 
と al2] の 7 を 比較 し , 小さ い ほ う の 6 を cl[6] に 代入 し た 後 , b の 要素 は 終わ る . その 
後 は a の 残さ れ た 要素 を c に コピ ー す る だ け で ある . 
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図 2.9 2 個 の 配列 の マー ジ の 説明 . 配列 a と b は, 整列 し た 配列 で ある . c は a と b を マー 
ジ し た 配列 で ある . 








2.11 SC トー ト 




















原理 は , 次 の と お り で ある . 整列 し て いな い 配 列 as が ある . 全 デ ー タ を ほほ ぼ 中 央 で 
2 分 割 し て 2 組 に 分 ける . さら に , 左右 の 2 組 を それ ぞ れ 2 分 割 し て 4 組 に 分 ける . 
以下 , 1 組 の 要素 の 数 が 1 個 に な る まで 2 分割 を 続け る . 要素 の 数 が 1 個 に な っ た 組 
は , それ だ け で 整列 し て いる と 見 な せる . 要素 の 数 が 1 個 に な っ た 組 に 到達 し た ら , 
今度 は 2 分 割 の 過程 を 逆 に た どっ て , 2 組 ず つ を マー ジ し て いけ ば , 最後 に は , 全体 
が 整列 し た 配列 に な る . 

鎖 2.10 は 配列 sa の 2 分 割 を 繰り 返し て , 要素 が 1 個 ず つ に な る 様子 で ある . まず , 
a を b と c の 部 分 に 2 分割 する が , b, c 等 は 説明 の た め に 付け た 配列 a の 部 分 配列 の 
名 前 で ある . 

プロ グラ ム (Sort_MergeSort.java) の 二 つ の メソ ッ ド (sort_MergeSort と merge), ま 

た , それ ぞ れ の 説明 は 以下 の と お り で ある . 




































































Sort_MergeSort.java の メソ ッ ド (sort_MergeSort) : 


1 pub1ic void sort_MergeSort(int 1, int r, double[] a) { 
2 if (1<r) て 
8) nt m= (1]+ ェ -1 ) /2: 





図 2.10 マー ジ ソ ー ト の 説明 . a は 元 の 配列 で も ある. b と c の 部 分 に 2 分割 し さら に , それ 
ぞ れ を 2 分 割 し て , 最後 に は 要素 1 個 ず つ に な る 
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Sort_MergeSort(] , m, 2) : 
Sort_MergeSort(m+1 , エ , 3) : 
merge(], エ , a) : 


0 の の 中 





1. L1 へ て 8: メソ ッ ド sort_MergeSort の 宣言 で あり , 配列 a の 添字 番号 の 1 番目 か ら 
r 番目 まで の デー タ を ソー ト す る . 

L2: 1=r で 要素 が 1 個 に な っ た ら 何 も せ ず に 戻る . 

L3: 左右 の 分 割 点 m を 指定 . 

L4: 左側 を ソー ト す る . m は 左側 に 属す る こと に な る . 

L5: 右側 を ソー ト す る . 

L6: ソー ト さ れ た 左右 を マー ジ す る . 

L8: ソー ト が 終了 する . 









































面 











さら の 避 の ト よら の らい 





Sort_MergeSort.java の メソ ッ ド (merge) : 


1 private void merge(int 1, int エ , double[] a){ 
み aiai9 iL 

3 doub1e[] aw= new doublela.1ength] : 
4 1nt m= (1+ エ -1 ) /2: 

5 nt 11]1= 1: 

6 1nt 1r]= m+1: 

4 int k= 1: 

8 Whi1e (111<=m & 層 1r1<= エ ){ 

9 if (a[i11] <a [ir1] ) て 

10 aw [k++] =a [111++] : 
11 } elset 
め aw [k++] = a[ ュ ェ ] ユ ++] : 
13 + 
14 が # 
5 whi1]e (111<=m) aw [k++] = a[1i11++] : 
16 wh1]e (ir1]<= エ ) aw [k++] = a[1 ェ ] ユ ++] : 
17 for (1i=]: 1 く <= ャ : ュ ++) 
18 ai]= aw[i] : 
19 + 
20 }+ 




















1. L1 へ て 20: メソ ッ ド merge の 宣言 で ある . 引数 の 配列 a の 添字 番号 の 1 番目 か ら 
L4 で 与え られ る mm 番目 まで と , その 次 か ら r 番 目 ま で の デー タ を マー ジ す る . 
L3: マー ジ す る と き に マー ジ 先 と する 作業 用 配列 aw の 宣言. 

L4: マー ジ す る 配列 a の 分 割 位置 で あり , m は 左側 に 属す る . 
L5< て 7: マージ す る 左側 と 右側 の 左端 用 変数 と , 作業 用 配列 の 左端 用 変数 に 値 を 
代入 する . 
L8 て 14: 両側 と も 残り が ある 間 は マー ジ を 繰り 返す 
L9 て 13: 左右 の 値 を 比較 し て , 右側 が 大 きけ れ ば 左側 を 作業 用 配列 に コピ ー レ , 
大 きく な けれ ば 右側 を 作業 用 配列 に コピ ー す る 
7. L15, 16: 左側 の 残り が あれ ば 作業 用 配列 に コピ ー し , 右側 の 残り が あれ ば 作業 
配列 に コピ ー す る . 


















































































































































て 
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8. L17^ へ 19: 作業 








配列 の 値 の 1 か ら ェ まで を , 元 の 配列 as に コピ ー す る . 


この こと を 図 2.10 で た どる こと に する . a を 2 分 割 し て b と c に する . b を 2 分 割 
し て d と e に する . d は 要素 が 1 個 で ある か ら , すでに ソー ト さ れ て いる と 考え て , b 
に 戻り , e に 進む . e を 2 分 割 し て h と i に する . h と i は 要素 が 1 個 で ある か ら , h と 





i で は 何 も せ ず に e に だ 戻り 























し て , ソー ト が 終了 する . 


演習 問題 














h と i の マー ジ を 行う . b に 戻り d』 と e の マー ジ を 行い a 








に 戻る . 次 に , 右側 の 処理 を する た め に c に 進む が , 戻っ て きた ら b と c の マー ジ を 





























2.1 プロ グラ ム Maximum.java。 MaximumTest.java を 修正 し て , 最小 値 を 求め る 


プロ グラ ム Minmimum.java , MinimumTest.java を 作り な さい . 


解答 














ト す る プロ グラ ム So 


例 : ソー スプ ログ ラム Minimum.java。 MinimumTest.java 





2.2 プロ グラ ム 8ort_Bubble.java。 Sort_BubbleTest.java を 修正 し て , 降順 に ソー 


rt_Bubble_d.java。 Sort_Bubble_dTest.java を 作り な さい . 


解答 例 : ソー スプ ログ ラム Sort_Bubble_d.java, Sort_Bubble_dTest.java 








2.3 プロ グラ ム Sort_Q 











uick.java。 Sort_QuickTest.java を 修正 し て , 降順 に ソー ト 





する プロ グラ ム 8ort_Quick_d.java。 Sort_Quick_dTest.java を 作り な さい . 
解答 例 : ソー スプ ログ ラム 98ort_Quick_d.java。 Sort_Quick_dTest.java 





休 間 法 








3.1 


少数 の 離散 的 な デー タ の 組 (Z,,) (た だ し 0<?< ヵ ) が 与え られ て いる と き , すべ 

て の z, に 対し て げ (zz) = が 成り 立つ 関数 で , 任意 の z に 対す る 関数 値 ヵ = げ (z) を 
求め る 方 法 を 補間 法 と いい , = げ () を 補間 式 と いう . げ 7) を 多項式 と し て , その 各 
項 の 係数 を デー タ 点 の 値 を 使っ て 定め た 式 を 補間 多項式 と いい ぃ , 特に , スプ ライ ン 関 
数 を 使う 場合 は スプ ライ ン 補 間 式 と いう . > が デー タ と し て 与え られ た 点 z, 等 の いく 
つか に 挟ま れ た 範囲 に ある 場合 に は 内 挿 と い ぃ いい. そう で な い 場 合 に は 外 挿 と いう . 一 
般 的 に , 外 挿 は 誤差 が 大 きく ほとん ど 役 に 立た な い . 























hm 





















































ラグ ラン ジュ の 補間 法 














邊 間 多 項 式 と し て 2 次 式 を 使う 場合 を 検討 し よう . 2 次 式 は 

















りー あ ( 々 ) ーg9“ 十 6 の 十 c (3.1) 











で ある . この 関数 は 3 個 の パラ メー タ a,5 ヵ .c を 使っ て いる か ら , これ ら の 値 を 決め る 
た め に は 3 組 の デー タ が 必要 に な る . 3 組 の デー タ と し て , 補間 値 を 求め よう と する ヶ z 
に 近い 3 点 を 使う と 誤差 を 小さ くす る こと が で きる . それ ら を zo, zi, ys と する . 求 
め る 補間 式 (3.1) に 3 点 の デー タ 値 を 代入 する と, 







































































9%0 三 @G26 十 0zo 十 c 
の 。 三 G@2 十 01 十 c (3.2) 
92 三 の 2 十 6z2 十 c 
と な る . ここ で , 未知 数 で ある パラ メー タ qc の 解 を 求め る と 
(wo 十 nz 十 の 2zo) 一 (9o2 十 no 十 92Z1) 
2 2。 」。2 2。 ヽ 7/42。 」。2。 」。2 
(8 十 ZZ2 十 270) 一 (622 十 fo 十 31) 
ヵ (26n 十 Zf の 5 十 Z290) 一 (692 十 ZT90 十 2 が 1 83) 
2 2 2 tn2 2 3.3 
(ZZ 十 ZZ2 十 220) 一 (?622 十 fo 十 31) 
ぁ (z6zys 十 fy290 十 23701 ) 一 (z6z2 如 十 Zfzz09 十 22190) 
Z621 十 fy 十 22o) 一 (Z822 十 170 十 3 の 1 ) 
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で ある . これ を 式 (3.1) に 代入 すれ ば 2 次 式 が 定め られ る . それ を 変形 し て 整理 する と 














0 00) し en し Je 
0 コ 0 語 P=D 「 Ph OU ご 300 
(3.4) 


と な る . この 式 は 書き 換え る と , 


2 凡 
kg-(。 ] を る (35) 


=0 \ 7 テ 00 り 


で ある 1!. x 次 式 に 拡張 する と , 


CE し ] だ) ー2_ Ai⑦) (3.6) 








?=0 7= テ 0( デ 9 





と な る こと は , 容易 に 想像 で きる で あろ う 2. 実際 .、 デー タ 点 の 一 つの z,。 を 式 (3.6) 
に 代入 する と , ゞ ) の 項 の 中 で ? = た 以外 の 項 は ゼロ と な り , ? = ニ た の 項 は 夕 と な る 
か ら げ (z) = み が 成り 立つ の で , この 式 は 確か に 補間 公式 で ある . これ ら は , ラグ 
ラン ジェ の 補間 公式 と いわ れる . 式 (3.6) を 見 る と わか る よう に , デー タ 点 (zo, z, 
ー。 が) は 大 き さ の 順に 並ん で いる 必要 は な いし , 間隔 も 一 様 で な く て よい . し か 
し , いろ いろ な 値 の z に つい て 精度 が 一 様 に な る よう に する た め に , 等 間隔 に と っ た 
り , ある い は , 値 の 変化 の 激しい 領域 で は 間隔 を より 小さ く と っ た り し て いる . 

次 に , この 式 の 精度 を 評価 し て みる . 真 の 式 を 7(z) と すれ ば , p を 一 つの パラ メー 
タ と し て 






























































7) = ん?) 十 pLL。(Z) 十 及 。+ 2(Z) (3.7) 


と 置く こと が で きる 3. た だ し , 関数 


Im(e) = -z) (3.8) 

? 王 0 
は ( ヵ 十 1) 次 式 , 及 。」2(z) は ( ヵ 二 2) 次 以上 の 式 で あり , すべ て の デー タ 点 = ァ z,(? = 
0, …, 7) で 及 。」>( ヶ ) ニモ 0 で ある . ここ で , ゅ ぁ を すべ て の デー タ 点 と は 異な る 点 z/ で 


げ (z) = 訪 (2) 二 gLI(Z/) が 成り 立つ よう な 7 と する . ゎ を この よう に 選ぶ と 玉 」5(z/) 
も ゼロ と な る . この p を 式 (3.7) に 代入 し て , その 両辺 の ( ヵ 二 1) 階 微分 を と る と , 





Je の) ge の 5 の) NM 





1. 


は 直後 の 項 の 和 (サム ) で あり , ][ は 直後 の 項 の 積 ( プ ロダ クト ) で ある . (7 交 2) は 7 が ? に 等 し く な い 場 合 に 
限定 し て いる . 

・ Az(z) は 関数 で ある . 

・ TIL。(z) は 関数 で あり , 項 の 積 を 表す 記号 ][ で は な い . 
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で ある . さら に ICH すり (Z) = (の 十 1)! で ある . 。rs(z) は 点 7 と zi(6 0, …, 7) の 
合計 ( ヵ 2) 点 で ゼロ と な る か ら , AWD(z) も Z。z。 = ニ 0,…,p 二 1) の ⑰+2) 


77. 


点 の 範囲 内 で ゼロ と な る 点 z" が 一 つ は 必ず ある . その 点 z? を 使え ば , 式 (3.9) か ら 











7 の キリ (2 グ ) 





の り 三 -+1L (3.10) 
が 決ま り , 点 z′ に お ける 誤差 は 
(2 十 1)/ 7 
CC2 Eee ICEDHHCZFN G11) 
で ある . けり (>) が ほとん ど 一 定 で ある な ら , 一 般 的 に 誤差 は 
0999) PC 
7(Z) 一 訪 (Z) ee ー zo)…( セ ター タ 。) 三 思 台 uo/ (3.12) 








で ある と いえ よう . そこ で , ( ヵ 十 1) 個 以上 の デー タ が ある 場合 に は , 精度 を 上 げ る 
た め に は (>ーzo)…(?ーz。) で 使う デー タ 点 zop,… , z。 を , が その 分 布 の 中 央 に 
くる よう に 選べ ば よい こと に な る . 

プロ グラ ム (Tag.java) の メソ ッ ド (lag) の 一 つと , その 説明 は 以下 の と お り で ある . 

















Lag.java の メソ ッ ド (lag) の 一 つ : 


1 public doub1e 1ag(doub1e x, double[] xd, doub1e[] yd) { 
nt n= xd.1ength: 

3 doub1e[] pr= new doubl1e [n] : 
4 double w1, 2: 

加 for (int =O: 1<n: 1+++) て 

6 w1= w2= 1.0: 

7 for (int ]=0: <n: j++) + 
8 if (1 == ]) continue : 

9 w1 *= x-xd[]] : 
10 w2 *= xd[i] -xd[]] : 
11 # 
12 pr [li] = w1/2: 
13 + 
14 double y= 0.0: 

5 for (int 1=O: 1<n: ユ ++) 
16 y += yd[i] *pr[i] : 

17 # 

18 return Y: 

# 


1. L1 て 19: メソ ッ ド lag の 定義 で ある . 引数 は 補間 値 を 求め る x, 既知 の デー タ 点 
(x, y) の 配列 xd。 yd で ある . 


2. L3: 式 (3.6) の プロ ダク ト 項 n デ ーー の 配列 . 
3. L4: TI(z 一), HL(z 一 7) の 作業 変数 

4. L5 て 13: プロ ダク ト 項 を n 項 作 る . 

5. L6: IT(z 一 z), L(z, 一 7) の 作業 変数 の 初期 化 . 
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L7 て 11: II( テ 一 zz), L(zz 一 7) の 作成. 
L8: プロ ダク ト 項 の 作成 で i 三 の 項 は 抜か す . 
L9: II(zーz,) の 作成 . 
L10: II(z, 一 z,) の 作成 . 
10. Li2: nh 芝 ー2) の 作成 
(gz 一 の ) 
11. L14: 補間 値 の 初期 化 . 
12. L15 て 17: n 項 の 積 和 を 作る . 
13. L16: 積 和 . 
14. L18: 補間 値 を 戻す . 


2 oo の 


















































図 3.1 は 指数 関数 e* の 補間 の 精度 が . デー タ 点 の 数 に よっ て どの よう に 変わ る か 
を 示し た も の で ある . デー タ 点 の 範囲 は [-2, 2] で あり , それ を 1 へ 5 等 分 し て 作っ た 
デー タ を 使っ て ,. それ ぞ れ 1 へ 5 次 式 で 補間 を し て いる . 1 次 式 の 場合 は .。 デー タ 点 は 
ー2, 2 の 2 点 で あり , 補間 式 は 実線 の 直線 で ある . 2 次 式 の 場合 は . デー タ 点 は 2, 0, 
2 の + 印 3 点 で あり , 補間 式 は 点線 の 2 次 式 で ある . 3 次 式 は * 印 4 点 と 破線 ,4 次 式 
は o 印 5 点 と 鎖線 。5 次 式 は x 印 6 点 と 一 点差 線 で ある . 4 次 式 の 鎖線 と 5 次 式 の 一 点 
差 線 は ほぼ 重なっ て お り , 図 で 見 る 精度 で は 収束 し て いる . 
表 3.1 は 図 3.1 と 同じ 補間 の > = 0 に お ける 相対 誤差 で も る . た だ し , = ニ 0 が デー 
夕 点 と な ら な いよ うな , 次 数 が 偶数 (デー タ 点 が 奇数 ) の 場合 の み を 表 に 載せ て ある . 
次 数 が 1 増す ご と に 精度 が 1 桁 弱 良 く な っ て いる 

式 (3.12) を 使っ て ぁ = 0 で の 誤差 の 検討 すし て みる . 指数 関数 は 何 階 微 分 を 行っ て 
も 関数 形 が 変わ ら ず 7⑦+ り (0) = 1 で ある . デー タ 点 の 範囲 [-2, 2] は 共通 で あり , 次 
数 が 増え る と その 範囲 内 で デー タ 点 の 数 が 増す の で , TL,(0) は 表 3.1 か ら わ か る よう 
に , 次 数 が 増し て も あま り 小 さく な ら な い . 他方 , 分 母 の ( ヵ +1)! は ヵ が 10 以上 に 大 
きく な る と , 次 数 が 1 次 増え る と 1 桁 以 上 大 きく な る . この こと は , 表 の 数 値 か あら も 
読み 取る こと が で きる . 当然 な と と で ある が , 精度 を 上 げ る た め に は , IL。(z) の 値 が 
小さ く な る よう に , 刻み を 細か くし , 使用 する デー タ 点 の >z 座標 の 範囲 を 小さ くす れ 




































































































































































3.1 ラグ ラン ジュ の 補間 法 に お ける デー タ 点 の 数 と 精度 の 関係 . 関数 は 指数 関数 ey、 デ ー 
タ 点 の 範囲 は [-2, 2] , 実線 の 直線 は デー タ 点 , 2, 2 の 2 点 を 使っ た 1 次 式 で の 補間 で あぁ 
る . + 印 3 点 と 点線 は 2 次 式 , * 印 4 点 と 破線 は 3 次 式 , o 印 5 点 と 鎖線 は 4 次 式 、 x 印 6 点 
と 一 点差 線 は 5 次 式 で ある . (Z03_.01.1agrange.java) 


























表 3.1 ラグ ラン ジュ の 補間 法 に お ける デー タ 点 の 数 と 精度 の 関係 . 関数 は 指数 関数 e, 











3.1 ラグ ラン ジュ の 補間 法 


デー 


夕 点 の 範囲 は [-2, 2] で ある . 第 1 列 と 第 4 列 は 補間 式 7(z) の 次 数 、 相対 誤差 は z = 0 に お 




















ける 値 { げ (0) - 1) で あり , IL。(0) は 誤差 の 評価 の 式 (3.12) に ある 項 で ある . 


























点 と な ら な いよ うな , 次 数 が 偶数 (デー タ 点 が 奇数 ) の 場合 の 


_-]agrange.java) 


江 


ー2.762195 | 一 4.0 10 | 一 7.687 セ ゼー 

0.085876 1.7777 | 12 3.10Eー 
ー0.001414 | 一 0.9216 | 14 | 9.11 セ ー 
1.310 セ ー5 0.4895 | 16 2.10Eー 





oO ⑦ 忌 や 


み を 表 に 載せ て ある 


時 | hGO | | 員 半 | im 





8 | 一 0.2622 
10 0.1410 
13 | 0.0759 
15 0.0409 





ば よい . 
































テー0 が デー タ 
(HO03_01 


3 


3 


蔽 3.2 は デー タ 点 の と り 方 に よっ て , 精度 が どの よう に 変わ る か を 示す も う 一 つの 


例 で ある . デー タ と し て , 範囲 [-10.5, 10.5] を 21 等 分 し た 22 点 の 座標 > と 指数 関数 


exp(z) の 値 を 用 意 す る . 補間 値 を 求め る 点 は ァ ニ 0 と し て , 使用 する デー タ 点 は 先 




















に 用 意 し た デー タ 点 の み と す る . ニー0 は デー タ 点 で は な い . 
exp(0.0) = 1.0 で ある . 図 の 横 軸 は 補間 に 使っ た 多項式 の 次 数 ヵ で あり , その 際 使 用 
し た デー タ 点 の 数 は ヵ 1 で ある . 縦 軸 は 補間 に より 求め られ た 神 
は 使用 する デー タ 点 を 補間 値 を 求め る 点 >=0 を 挟ん で 左 


































































































間 値 で ある . 
ほぼ 同数 と っ た 場合 の 補 





ヶ 0 に お ける 真 値 は 











上 





o 昌 








間 で あり , ( ヵ 十 1) が 奇数 の 場合 , 例え ば ヵ = 2 で は 左側 に 2 点 , 右側 に 1 点 で ある . 











x 印 は * 々 =0 の 左側 に 常に 1 点 , その 他 は 右側 を 増やし て いっ た 場合 








の も の で ある . 


前 者 で も 真 値 へ の 収束 は 遅く , 後者 で は 収束 せ ず に 発散 が 始ま っ て いる . 収束 の 遅い 
する の で は な く , より 外側 の 点 を 





原因 は , デー タ 点 の 数 を 増やす と き に 刻み を 細か く 














使う の で 式 (3.12) の 項 IL。(z) が 大 きく な る と いう 


に , より 遼 く の デー タ ま で 使う こと で は 精度 を 上 げ 


般 的 な 理由 か ら で あ る . 











られ な いこ と が ある . 








図 3.2 ラグ ラン ジュ の 補間 法 に お ける デー タ 点 の と り 方 と 精 





多項式 の 次 数 縦 軸 は 補間 に より 求め られ た 補間 値 で ある . 調 

















_-02_1agrange.java) 








この よう 


度 の 関係 . 横 軸 は 補間 に 使っ た 
* 細 は 本 文 を 参照 の こと . 


(Z03 
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3.2 ラグ ラン ジュ 補間 の 汎用 プロ グラ ム 














ラグ ラン ジュ っ ュ の 補間 多項式 は 前 節 で 述べ た と お り で ある が , 実用 的 に 使い や すい 
プロ グラ ム が 必要 で ある . それ は , z の ある 範囲 内 で 昇順 ある い は 降順 の ヵ + 1 点 の 
デー タ の 組 (zo, %%), …, (z。, ) を 与え , 補間 点 > と 補間 に 使用 する デー タ 点 の 数 ヵ 
を 指定 する と , 点 z に 隣接 し た 妨 十 1 個 の デー タ を 使っ て , ヵ 次 の ラグ ラン ジュ 補 
間 で 求め た 答え を 戻す プロ グラ ム で ある . 図 3.3 は 関数 sin(z)/z の デー タ 値 と し て , 
ー6r, 6 | を 30 等 分 し た デー タ 31 組 を 与え . それ を 補間 する 3 次 の ラグ ラン ジュ 補 
間 で , -6.5r か ら 6.5r まで の 多く の ヶ > 点 で 補間 値 を 求め 、 グラ フ に し た も の で ある . 
o 印 は 与え を た デー タ 点 で ある . |z| < 6z の 実線 は 内 挿 補間 で ある か ら 近 似 が 良い が , 
| > 6z7 の 領域 で の 点線 部 分 は 外 挿 に な っ て いる の で , 両端 の デー タ 点 か ら 離 れる に 
従っ て 近似 が 悪く な っ て いく . 

ラグ ラン ジュ の 補間 法 に よる と , 微分 値 を 求め る こと も 可能 で あり , 式 (3.6) を 微分 
し た 式 






























































































































































(⑰ ゆ = > UM の (3.13) 





を 使え ば よい . た だ し , 


// 7 


Ai)= う . 5 ニテ (3.14) 


を 王 0 (9 (一 テ ) 00Z0 「 “ 


で ある . し か し , z の 値 が 変わ り , 使う デー タ の 区 分 が 移る と 補間 式 自体 が 変わ る か 
ら , その デー タ 点 で は 微分 値 が 連続 に な ら な い の で 注意 が 必要 で ある . 3.3 の 破線 

















と 一 点差 線 は 補間 に より 求め た 微分 値 で あり , x 印 は 関数 の 微分 か ら 求 め た 真 値 で 
ある . 

プロ グラ ム (Lagrange.java) の メソ ッ ド (jagrange) と , その 説明 は 以下 の と お り で 
ある . 

















3.3 ラグ ラン ジュ の 補間 法 の 汎用 プロ グラ ム に よる 出力 . 関数 は sin(z)/z で あり , o 印 は 
与え た デー タ , 実線 は 補間 曲線 で ある . |zl| > 6r の 領域 で の 点線 部 分 は 外 挿 で ある . 破線 は 
補間 に より 求め た 微分 曲線 で あり , x 印 は 関数 の 微分 か ら 求 め た 真 値 で ある . |z| > 6z の 領域 
で の 一 点 鎖線 部 分 は その 外 挿 で ある . (Z03_03.agrange.java) 







































































3.2 ラグ ラン ジュ 補間 の 汎用 グラ ム 35 




















Lagrange.java の メソ ッ ド (lagrange) : 


〇 C 0 の の 喉 の 〇 DD は 


収 選 選 選 愉 忌 OO oO oO oo oo o) oO) oO) 6 hN) DD DD DD D DD DD D) DD は ビニ ロビ ビニ ロト は は は は 
mu の O DD ロロ の OOo の の よい DD は の Oo の の OMD は の 6 〇 oo の の は よ よ の いい は の 


// 


pub1ic doubl]e 1agrange(double x, double[] xdq, double[] yd, 
int min, int max, int n) て 
int i。]: 
doub]1e [] pr= new doub1e [n+1] : 


1f (max-min <=n) { 
System.out .print]n("Error: n="+n+"! is 1argeer than max-min."): 
return 0: 
System . ex1t(-1) : 


ュ int imin,1maxj: 

int n1= (n+1)/2: 

nt n2= (n+2) /2: 

doub1e sg= xd[max] -xd [min] : 


1m1n= maXx-Tm: 
for (i=min+n2: 1 く <=max-n1: ユ ++) て 
if ((x-xdq[i])*s < 0) { 
im1n= ュ -n1: 
break: 


+ 

if ((n/2)*2==n && Math.abs(x-xd[i-1] ) <Math .abs(x-xd[i] )) { 
NII 王 三 に 

+ 


1max= 1m1n+n: 


doub]e w1, 2: 
for (i=imin: 1 く <=1max: ュ ユ ++) 


w1= w2= 1.0: 
for (]=imin: ] く =imax: ]++) て 
if (1 == ]) continue: 


w1 *= x-xd[]] : 

w2 *= xd[i] -xd[]] : 
肌 
pr [i-1imin] = w1/2: 


+ 


double y= 0.0: 

for (1i=imin: 1 く <=1max: ュ ユ ++) 
y += yd[i] *pr [|iーimin] : 

+ 


return 7: 





1. L1, 2 て 45: メソ ッ ド lagrange の 定義 で ある . 引数 の x は 補間 値 を 求め る z 
標 、xd, yd は 既知 の デー タ 点 (x, y) の 配列 , min は 使用 する 配列 の 最小 添字 
号 , max は 使用 する 配列 の 最大 添字 番号 で あり , n は 補間 式 の 次 数 で ある . 





















































潤 時 隊 
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り 値 は 補間 値 で ある . 
2. L4: プロ ダク ト 項 ロー ジル の 配列 . 











7 一 錠 》 
。 L6 て 10: 次 数 n <max - min で な い 場 合 に 警告 を 出す . 
4. L15: 変数 s に xq[max] - xqhmin] を 代入 し 昇順 な ら 正 , 降順 な ら 負 と する . z 
座標 は 昇順 で も 降順 で も か まわ な い . 
5. L17 て 26: 内 挿 の 場合 は 使う デー タ 点 の 中 央 近く に x が 来る よう に デー タ 点 を 選 
び , 外 挿 の 場合 は x に 近い 点 か ら 選 ん で , 補間 に 使う 最小 添字 番号 を 決定 する . 
6. L27: 補間 に 使う 最大 添字 番号 を 決定 する . 


7. L29 こ 38: ブロ ダク ト 項 ビー) の 作成 
(z。 還 7) 

































































8. L40 て 43: 補間 値 の 計算 . 
9. L44: 補間 値 を 返す . 




















プロ グラ ム (Lagrange.java) の 微分 値 を 求め る メソ ッ ド (qagrange) の 一 部 と , その 
説明 は 以下 の と お り で ある . 


Lagrange.java の メソ ッ ド (dlagrange) の 一 部 : 


1 public doub1e d_]agrange(doub1e x, double[] xd, doub1e[] yd, 
の int min, int max, int n) て 
3 中略 

4 doub1e w1, w2, 3: 

5 for (i=imin: 1 く <=1max: ユ ++) 

6 w1= 1.0: 

MM w2= 0.0: 

8 for (k=imin: k<=1max: k++) 

9 if (k == +) continue : 

10 w3 = 1/(xd[i] -xd[k] ) : 

11 for (]=imin: ] く =imax: ]++) て 

12 if (]== ュ || ]j==k) continue : 

13 w3 *= (x-xd[]] )/(xd[i] -xd[]] ) : 
14 + 

15 W2 += 3: 

16 + 

17 1ambda [i-imin] = 2: 

18 + 

19 doubl1e 7= 0.0: 

20 for (i=1min: 1 く <=1max: ユ ++) 

21 y += yd[i] *1ambda [1-1min] : 

22 ゅ 

23 return Y: 

24 + 


1. L1, 2 て 24: メソ ッ ド dagrange の 定義 で ある . 引数 は メソ ッ ド lagrange と 同じ 
あり , 戻り 値 は 補間 で 求め られ た 微分 値 で ある . 
2. L4 て 18: 式 (3.14) の A' の 作成. 
. L19 へ 22: 微分 補間 値 の 計算 . 
4. L23: 微分 補間 値 を 返す . 








3.3 
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ニュ ー ト ン の 補間 法 

















ニュ ー ト ン の 補間 法 も 補間 多項式 を 使う 方 法 の 一 つ で ある . Lagrange の 補間 法 と 同 
様 に . まず, 2 次 式 で 補間 する 場合 を 検討 し よう . 2 次 式 は 














りー 7(z) = gz? 十 0 十 c 王 po 十 Pm( ァ ーzo) 十 ps( ァ ーzo)( ァ ー タ の ュ ) (3.15) 

















の 形 に 書き 換え る こと が で きる . この 関数 は 3 個 の パラ メー タ ヵ , pi, ps を 使っ て 
いる か ら , これ ら の 値 を 決め る た め に は 3 組 の デー タ が 必要 に な る . 3 組 の デー タ 
(zo, %0) , (z, ) , (ze, み p) を 補間 式 (3.15) に 代入 する と, 





290 三 の 0 
外 三 7o 十 nm( タ ューzo) (3.16) 
92 三 7o 十 zi(22 一 zo) 十 の 5(zZ 一 zo)(Z2 一 多 1) 





と な る . ここ で , 未知 数 で ある パラ メー タ ? ヵ , pi, po の 解 は 簡単 に 求め る こと が で 





270 三 0 
の 」 三 ( 久 ーp カ 0)/( タ ュー zo) (3.17) 
2 三 人 {( め 一 の o)/(z2 一 zo) 一 1)/(z 一 1) 





が 


で ある . これ を 式 (3.15) に 代入 すれ ば 2 次 式 が 決ま る . この 方 法 を ヵ 次 多項式 に 拡 』 
する と p ぁ ゎ ,(0 <? < る ) は 


娘 三代 … 代 (po)/(z。 一 zo) 一 7(Z。 一 1) 一 5)/(Z: 一 75) 
Ne 2)/(Z: 所 2) 呈 久 -1/(z。 還 1) 


で ある . そこ で , 式 (3.15) を ヵ 次 式 で の 一 般 型 に 書き 換え る と , 


(3.18) 





7 


? 一 1 
= う > gg る ) (3.19) 


2 一 0 7 三 0 
































と な る . この 式 (3.19) を ニュ ー ト ン の 補間 公式 と いう . プロ グラ ム で 効率 の 良い 形式 
書き な お す と , 








還 





げ (*) = ニー 代 …1 れ pm( を 一) 十 pn- ュ (ター mp-2) 十 pn-21( タ ー 2-3) 


(3.20) 
+… 十 221( ヶ ーw1) 十 pi)( ァ テー zo) 十 の 0 


と な る . 図 3.4 は , サイ ン 関 数 (simz>) の ニュ ー ト ン の 補間 公式 に よる グラ フ で ある 
表 3.2 は 図 3.4 と 同様 の 補間 の ァ = ァ /8 に お ける 値 で ある . 次 数 が 偶数 (デー タ 点 が 
奇数 ) の 場合 の み が 表 に 載せ て ある . 次 数 が 1 増す ご と に 精度 が 1 桁 弱 良く な っ て い 
る が , 8 次 の 値 は 7 次 の 値 と 変わ っ て いな い . 
式 (3.20) か ら わ か る よう に , デー タ 点 (zo, z1,…・, z。) は , 大 き さ の 順に 並ん で い 
る 必要 は な いし , 間隔 も 一 様 で な く て よい . z の 値 が 等 間隔 で 与え られ て いる 場合 に 
は , 補間 計算 を 能率 良く 実行 する た め に , いろ いろ な 公式 が 考案 きれ て いる が , 大 差 
は な い . 
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図 3.4 ニュ ー ト ン の 補間 法 . 関数 は サイ ン 関 数 (sinz) , デー タ 点 の 範囲 は [0, 2r] , デー 
タ 点 o 印 は 等 間隔 で 9 点 と っ て ある . 補間 に は 8 次 多項式 を 使っ て いる . (Z03.04_NewtonInt. 


) ava) 

















ニュ ー ト ン の 補間 法 に お ける デー タ 点 の 数 と 精度 の 関係 . 関数 は サイ ン 関 数 sin z, 
デ 点 の 範囲 は [0, 2r] , デー タ 点 は 等 間隔 で 9 点 で ある . 補間 値 を 求め る 点 は ヵ 々 = ニ ィ /8 
で , 補間 多項式 は 1 次 か ら 8 次 まで で ある . 第 1, 3, 5 列 は 補間 式 の 次 数 で あり , 第 2, 4, 6 
列 は 補間 値 で ある . (HO3.02_NewtonInt.java 


火 | 補間 値 | 次 | 補間 値 補間 人 





























1 0.35355 + 0.38120 0.38365 
2 0.40533 5 0.37845 0.38365 
3 0.39460 6 0.38136 | 真 0.38268 


プロ グラ ム (NewtonTnt.java) の コン スト ラク タ (NewtonInt) と , その 説明 は 以下 の 
と お り で ある . 


NewtonInt.java の コン スト ラク タ (NewtonInt) : 


1 public NewtonTnt(int n, double[] xd, doub1e[] yq) { 
2 this .xd= xd: 

9 p = new double[n+1] : 

4 doub]e wi: 

5 for (int =0: 1<=n: ユ ++) { 

6 w = 7d[i] : 

7 for (int ]=0: ]<1: ]++) { 

8 w = (w-p[j]) / (xd[i] -xd[j] ): 
9 が 

10 pi]= wi 

11 + 

12 + 


1. L1 て 12: コン スト ラク タ NewtonInt の 定義 で ある . 引数 の n は 補間 公式 の 次 数 
で あり , デー タ の 組 数 1 で ある . xd は デー タ の 座標 の 配列 で あり , yd は 
デー タ の ゅ 座標 の 配列 で ある . 

2. L2: クラ ス 内 の 配列 xd に , 引数 の 配列 イン スタ ンス の 参照 を 代入 する 

3. L3: コン スト ラク タ の 外 で 定義 され て お り , クラ ス 全 体 が 定義 域 で ある フィ ー ル 
ド p の 配列 イン スタ ンス を 作る 

4. L5 で て 11: 多項式 の パラ メー タ p の 計算 を する 
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プロ グラ ム (NewtonTnt.java) の メソ ッ ド (newtonInt) と ,。 その 説明 は 以下 の と お り で 
ある . 


NewtonInt.java の メソ ッ ド (newtonInt) : 


1 public doub1e[] newtonTnt(double[] x) { 
1nt m= xx.]ength: 

3 doub1e[] y= new doub1e [m] : 
4 doub]1e wi 

思 for (int k=O: k<m: k++) { 
6 w = p[p.1ength-1] : 

MM for (int i=p.1ength-2: 1>= 0: ュー-) て 
8 w = w*(x[k]-xd[i] ) + pi] : 

9 # 

10 yLk] = ij 

11 ル 

12 return Y: 





1. L1 へ て 13: メソッド newtonInt の 定義 で ある . 引数 の x は 補間 値 を 求め る 座標 の 
配列 で ある . 戻り 値 は 補間 値 の 配列 で ある . 

L2: 配列 x の 長 さ を mm に 代入 する . 

L3: 求め る 補間 値 の 配列 . 
L5 て 11: 求め る 補間 値 の 数 だ け ル ー プ を まわ す 
L6 て 10: 式 (3.20) に よる 補間 値 の 計算 . 

L11: 補間 値 の 配列 を 返す . 















































の の た の い 
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ラグ ラン ジェ の 補間 公式 も ニュ ー ト ン の 補間 公式 も ヵ 二 1 個 の デー タ 点 を 使っ て 
次 多項式 で 補間 し た が , デー タ 点 で の 微分 値 も 与え られ て いれ ば , それ ら も 使う こ 
と が で きる . この 場合 は 2( ヵ + 1) 個 の デー タ を 使う こと に な る か ら , 近似 多項式 を 
2 ヵ 二 1 次 式 と する こと が で きる の で , 



































1(z) = gonr1y 1 上 goa の 2 グ 上 …・g1 の 2 十 …・g0 (3.21) 

















で ある . 2 ヵ 十 2 個 の 係数 は 2 ヵ + 2 個 の 条件 














Ti1(z) 三 の (? ーー 0, ーー っ の) 

お 。」1(Z) 王 人 の (? ー 0,…・, 7 の) 
か ら 決め る こと が で きる . ラグ ラン ジュ の 補間 の 場合 に 補間 公式 を 式 3.6) の 形式 に し 
た よう に , ラグ ラン ジュ の 補間 公式 を 拡張 し て 


(3.22) 















































mi(zZ) モニ フウ 2) う 久 (?) (3.23) 
2 王 0 ? 王 0 
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と 置く と , (2), 妨 (z) は (2 1) 次 の 多項式 


&(z) = 一 2A8(Z)( タ ー 1AKZ) (3.24) 
7(z) ニー (ターzAfPZ) 
で ある . A(z) は 式 (3.6) で 使わ れ て お り , 
Az(z) = II 2 (3.25) 
00* り 7 
で ある . 同様 に , 微分 は 
mm(e) ニー う 8 の) う (る?) 
2 王 0 2 王 0 
(3.26) 
( 々 ) = ーー2A(z)Af(Z) 2 人 1 一 2A6()( ゃ ー を り )AS(Z)A( の ) 
7 が () ーー AZ) 十 2 ーzy)Ai(z)Az(Z) 


で ある . た だ し , AZ(z) は 式 (3.14) で ある . 
図 3.5 は , [-z, z] の 領域 を 10 等 分 し た 11 の z 点 で の 関数 (sim z) の 値 と その 微分 
値 を デー タ と し て , エル ミー ト の 補間 法 を 使っ て , その 領域 の グラ フ を 描い た も の で 
ある . o 印 は 関数 (sin z) の デー タ 値 、 x 印 は その 微分 値 (cosz) で ある . 実線 は 補間 で 
求め た 関数 (sm z) 点線 は 補間 で 求め た 1 次 導 関 数 (cosz) で ある . 

プロ グラ ム (Hermit.java) の 補間 関数 値 を 求め る メソ ッ ド (hermit) と ,、 その 説明 は 以 
下 の と お り で ある . 
























































Hermit.java の メソ ッ ド (hermit) : 


1 
2 
3 
4 
5 
6 
7 
8 
9 


pub1ic doubl1e hermit(double x, double[] xd, double[] yq, double[] ydd, 
int min, int max, int n) て 
int i,]: 
doub]e[] xi= new doub1e [n+1] : 
doubl]e[] eta= new doub1e [n+1] : 


1f (max-min <=n) て 
System.out .print1n( "Error: n="+n+" is 1argeer than max-min."): 
return 0: 





3.5 エル ミー ト の 補間 法 . 関数 (sinz) の 値 と その 微分 値 を デー タ と し , エル ミー ト 補 間 
を 使っ て 求め た グラ フ で ある . o 印 は 関数 (sin >) の 値 。 x 印 は その 微分 値 (cogz) で ある . 実 
線 は 補間 で 求め た 関数 (simz) , 点線 は 補間 で 求め た 1 次 導 関 数 (cosz) で ある . 
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SyStem . ex1 も (-1) : 


int imin,1imax: 

int n1= (n+1)/2: 

ュ int n2= (n+2) /2: 

doub1e s= xd[max] -xd [min] : 


1m1n= maXーT: 
for (i=min+n2: 1<=max-n1: ユ ++) て 
if ((x-xd[i])*s < 0) { 
1m1in= 1i-n1: 
break: 
# 
if ((n/2)*2==n && Math.abs(x-xd [1-1] ) <Math . abs(x-xd[i] )) { 
WM ニニ 5 
+ 


1max= 1m1n+Tn: 


doub1e w1, w2, w3: 


for (i=1m1n: 1<=1max: ユ ++) 


w1= 1.0: 

w2= 0.0: 

for (]=imin: ] く =imax: j++) て 
if (1 == ]) continue: 


w3 = 1/(xd[i] -xd[]] ): 

W1 *= (xx-xd[]] ) *w3: 

W2 += 3: 
+ 
1 [1 ュ -1min] = (1.0-2*w2*(x-xd [1] ) ) *w1*w1 : 
eta [ii-1min] = (x-xd [1] ) *y1*w1 : 


+ 


double y= 0.0: 
for (i=im1n: 1 く <= ュ max: 1 ユ ++) 

y += yd[i] *xi [ュー1min] +ydd [1] *eta [1-1min] : 
+ 


return : 
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1. L1, 2 て 49: メソ ッ ド hermit の 定義 で ある . 引数 の x は 補間 値 を 求め る 点 の z 座 

















標 , xq, yd, ydd は 既知 の デー タ 点 (Gx, y) と 微分 値 の 配列 、min は 使用 する 配列 
の 最小 添字 番号 , max は 使用 する 配列 の 最大 添字 番号 で あり , n は 補間 式 の 次 
































数 で ある . 戻り 値 は 補間 値 で ある . 
L4: 式 (3.23) で 関数 値 ydjii と の 積 和 を 作る 項 の 式 (>) の 配列 . 
L5: 式 (3.23) で 微分 値 ydd 財 と の 積 和 を 作る 項 の 式 ヵ (z) の 配列 . 
































L16: 変数 s に xq[max]-xq[min] を 代入 し , 昇順 な ら 正 , 降順 な ら 負 と する . z 


座標 は 昇順 で も 降順 で も か まわ な い . 
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5. L18 て 27: 内 挿 の 場合 に は , 使う デー タ 点 の 中 央 近く に x が 来る よう に デー タ 点 
を 選び , 外 挿 の 場合 に は x に 近い 点 か ら 選 ん で , 補間 に 使う 最小 添字 番号 を 決 
定 する . 

6. L28: 補間 に 使う 最大 添字 番号 を 決定 する . 

7. L30 て 42: 式 (3.24) の 項 E(z), 7(z) の 作成. 

8. L44 て 47: 補間 値 の 計算 . 

9. L48: 補間 値 を 返す . 
































プロ グラ ム (Hermit.java) の 補間 微分 値 を 求め る メソ ッ ド (qd_hermit) の 一 部 と . その 
説明 は 以下 の と お り で ある . 














Hermit.java の メソ ッ ド (d_hermit) の 一 部 : 


1 pub1ic double d_hermit(double x, double[] xd, double[] yd, doub1e[] ydd, 
2 int min, int max, nt n) て 

3 中略 

4 doub1e w1, 2, w3, w4, w5=0 .0: 

め for (i=imin: 1 く <=1max: ュ ユ ++) 

6 w1= 1.0: 

4 w2= 0.0: 

8 w4= 0.0: 

9 for (k=1m1n: K く =1max: K++) て 

10 ュ if (k == i) continue : 

11 w3 = 1/(xd[i] -xd[k] ) : 

12 W1 * ニ = (x-xd[k] ) *w3: 

13 W2 += 3: 

14 w5= 1.0/(xd[i] -xd[k] ) : 

15 for (]=imin: ] く =imax: j++) て 

16 if (]j== ュ i || ] ニ =k) continue : 

17 w5 *= (x-xd[]] )/(xd[i] -xd[]] ) : 

18 + 

19 WV4 += 5: 
20 + 
21 1 _d [1-1min] = -2*w2*w1*1 + 2*(1.0-2*w2*(x-xd [1] ) ) *w4*w1 : 
22 eta_d[i-imin] = w1*w1 + 2*(x-xd[1] ) *w4*w1 : 

23 J 

24 double y= 0.0: 

25 for (1i=imin: 1 く <= ュ 1max: ュ ++) 

26 y += 7d[i]*xi_d[i-1min]+ydd[i] *eta_d[ ュ 1-imin] : 
27 ザ 』 

28 return Y: 

29  }+ 


1. L1, 2 て 29: メソ ッ ド d_hermit の 定義 で ある . 引数 は メソ ッ ド hermit と 同じ で 
あり , 戻り 値 は 微分 値 (1 次 導 関 数 ) で ある . 
2. L4 へ 23: 式 (3.26) の 項 (z), 7'(z) の 作成 . 
。 L24 て 27: 式 (3.26) で 微分 値 の 補間 計算 を する . 
4. L28: 補間 微分 値 を 返す . 
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3.5 スプ ライ ン 補 間 





























下 間 式 と し て スプ ライ ン 関 数 ヵ = S(z) を 使う 場合 を (スプライン 補間 と いう . スプ 
ライ ン 関 数 に つい て は , 第 12 章 に 解説 が ある が , ここ で は , 補間 に 使う B スプ ライ 
ン 補 間 と 3 次 スプ ライ ン 補 間 に つ いて 述べ る . 一 般 的 に スプ ライ ン 関 数 は 区 分 的 多 項 
式 で あり , 与え られ た デー タ 点 すべ て に わた っ て 単 一 の 多項式 を 使う これ まで の 補間 
と は 異な り , デー タ 点 を 区 分 し て 局所 的 な 多項式 を 作り , それ ら を 使う も の で ある . 
次 の B ス プラ イン 補間 の 場合 に は , ヵ ー1 次 の 微分 まで 連続 で ある . > 軸 上 で 区 分 す 
る 点 を 節点 と いい , デー タ 点 z, を 節点 と し て 使う 場合 ちあ る が , デー タ 点 と は あま り 
関係 が な い 適当 な 点 を と る 場合 も ある . その 場合 に は , 後 で 示す 条件 を 満た す 必要 が 
ある . 節点 は g。 で 表す こと に する . 



























































3.5.1 B ヨ スプライン に よる 補間 


B スプ ライ ン (Basis spliine) と は 局所 的 な 多項式 W。 (>) と し て 作ら れ , スプ ライ ン 
関数 が それ ら を 基底 関数 と する 線形 結合 


> し の 7) (3.27) 


で 定義 され る も の で ある . この 場合 に は , デー タ 点 を 節点 に し な い . 多項式 の 次 数 。 
に 応じ て , ? 次 の B ス プラ イン , ある い は 1 十 1 階 の B ス プラ イン と いわ れる . 3 次 
(4 階 ) の B ス プラ イン が よく 使わ れる の で , 説明 は 主として 3 次 の B ス プラ イン で 行 
うこ と に する . 

B ス プラ イン に は いく つか の 作り 方 が ある が , 補間 の 場合 に は ド ュ ブ ア ・ コ ッ ク 
ス の アル ゴリ ズム に よる も の が 使わ れる . この 方 法 に よる と 編 階 の B ス プラ イン 
A7。 7(z) の 値 は 次 の 漂 化 式 で 求め られ , 1 階 の 関数 か ら 順 次 高階 の 関数 が 作ら れる . 
































1 
マル 」 
0 補 同志 語 (5-1 ミタ くる) 
0 (その 他 ) 


党 三 ーー (7 三 2 …) 





(3.28) 











刀 3.6 は ド ュ ブ ア ・ コ ックス の アル ゴリ ズム に よる B ス プラ イン で あり , 上 か ら 
72 番目 が ヵ 階 の 関数 で ある . 一 番 上 の 1 階 の 関数 は 1<#7<8 の 8 個 示さ れ て お り , 
それ ぞ れ が 2 個 の 節点 を 使っ て いる . 図 の o 印 は , 各階 の 一 番 右側 (7) = 8) の B ス プ 
ライ ン に 使わ れ て いる 節点 を 示し て いる . 関数 の 数 は , 階 が 上 上 が る た びに 1 個 ず つ 
減っ て お り , 4 階 で は 4<7<8 の 5 個 で ある . 導 に , 1 個 の 関数 が 使う 節点 の 数 は 増 
加 し , 4 階 で は 5 点 を 使っ て いる . B スプ ライ ン に 付け られ る 番号 の 7 は 、 その 関数 
に 使わ れ て いる 一 番 右 側 の 節点 の 番号 と な る . この B ス プラ イン 7 ヵ (z) は 規格 化 
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っ * っ 
の の 


ーー ュ レ ンー 














図 36 ド ュ ブ ア ・ コ ックス の アル ゴリ ズム に よる B ス プラ イン . 上 か ら ヵ ヵ 番 目 が 妨 階 で あ 
る . 一 番 下 の 4 階 だ な け は , 規格 化 さ れ た B スプ ライ ン MA 7(zZ) で あり , 4 倍 の 大 き さ に な っ 
て いる . o 印 は , 各階 の 一 番 右 側 (7 = 8) の B スプ ライ ン に 使わ れ て いる 節点 で ある . (Z03 
-06_-deBoor_Cox_exp.java) 




















され て お ら ず , 不便 な こと も ある の で 
だ 16 一 (5 9 g- ぁ )47。 7( 々 ) (3.29) 


で 与え られ る , 規格 化 さ れ た B ス プラ イン を 使う こと が 多い . 
7 階 の B スプ ライ ン AM ,(z) を 基底 関数 と する スプ ライ ン 補 間 式 は 





ど 十 772. 


5(Z) に 2 gg テ () (3.30) 











で ある . 補間 式 が 定義 され る 領域 は , 節点 』 か ら &, を 覆う 領域 で あり , その た め に , 
必要 と され る B ス プラ イン は 7= テ 1,…・, ル 十 7。 で ある . し か し , ある 一 つの 点 ? で 
実際 に 寄与 する B ス プラ イン の 数 は , その 点 で ゼロ で な い 関 数 だ け で ある か ら 7? ヵ ヵ 個 
で ある . 例え ば , 図 3.6 の 一 番 下 の 4 階 の B スプ ライ ン で ゼロ で な いも の は , 区 間 。。 
< へ Es に お いて 4 個 で ある こと が わか る . し か し , デー タ 点 が 節点 に 重なっ て いる 場合 
に は , ゼロ で な いも の は 3 個 に な っ て し まう . また , 一 番 左 端 の 7 = 1 の 関数 は 節点 
生か から を 使う の で , 全体 と し て は 7= テ 1 一 娘 。… と 十 の で 。 ァ 二 27z 個 の 節点 が 
必要 と な る . 

まとめ る と , 語 か ら & まで の 領域 を 覆う ヵ 階 の スプ ライ ン 関 数 を 作る 場合 に は , 
画 端 の 付加 節点 ヵ 個 ず つ を 加え て , 節点 は ヶ 2 ヵ ヵ 個 が 必要 で あり , その と き で きる 
B ス プラ イン は ァ +z ヵ 個 で ある . そこ で , スプ ライ ン 関 数 の 係数 を 決め る た め に は , 
必要 な デー タ 点 の 数 も ッ +z ヵ 個 で ある . 

プロ グラ ム (Bspl.java) の メソ ッ ド (bspl) と , その 説明 は 以下 の と お り で ある . 



















































































Bspl.java の メソ ッ ド (bspl) : 


1 pupblic int bsp1(doub1e xp, double[] xi, doub1e[] N) { 
2 1nt nxi= xi.]ength: 
3 nt or= N.1ength: 
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1nt』J メ 1 


nt iorm1= or-1: 


1nt iorp1= ior+1: 


NE TX101OW ニ mcn ニ ToP* 
doub]e [] [] M= new doub1e [iorm1] [iorp1] : 
mn に 1 


for (]=0: ]<nx1: j++) { 


+ 


if (xp く xi[]] ) break: 


1f (]j>nximior) { 


+ 


+ 


] テ 1 ュ = nx1m1or : 
else て 


jsi=j: 


for (i=0: 1 く <1orm1: ュ ++) て 


+ 


for (]j=0: ]<iorp1: ]++) て 
Mi] = 0.0: 
# 


M[O] [1]= 1.0/(xi[jxi] -xi[]xi-1] ) : 
for (1=1: i<iorm1: ュ ++) て 


+ 


for (]=1: ] く = ュ +1 : ]++) t 
kk= 1+]- ュ ー2: 
ユ = ]x1+] ニ 1・ 
M[i] []]=((xp-xi [k] ) *M[i-1] []-1] + (xi[1] -xp) *M[i-1] []] ) 
/ (xi [1] -xi [k] ) : 


for (]=1: <iorp1: j++) { 


+ 
中 略 


k= xi+]-1or-1 : 
出 三 還 人 Xa] el 
N[]-1]=(xp-xi [k] )*M[iorm1-1] []-1]+(xi [1] -xp)*M[iorm1-1] []] : 


return ]X1 : 


』 


L1 て 41: メソ ッ ド bspl の 定義 で ある . 引数 xp は B ス プラ イン 値 を 求め る z 座 
標 , xs は 指定 し た 節点 の 配列 , N は 戻さ れる B ス プラ イン の 値 の 配列 で , 要素 
数 は ゼロ で な い B スプ ライ ン の 数 (階数) だけ で あぁ る. 戻り 値 は 。 ゼロ で な い 
最初 の B スプ ライ ン の 番号 で ある . 

L2, 3: 節点 の 数 と 階数 を nxi, ior に 代入 する . 

L5, 6: 式 (3.28) で の M の 計算 の た め , 随 数 1 と 階数 +1 を 定義 する . 

LS: 式 (3.28) で の M の 定義 は , 随 数 -1 まで と し , 最後 の 規格 化 さ れ た 値 は 引 
数 の N に 代入 する . 

L11 て 13: 座標 点 xp が 節点 の どこ に ある か を 調べ , j に 代入 する . 

L14 て 18: xp が 最後 の B スプ ライ ン の 左端 を 超え て いた ら , 最後 の B スプ ライ 
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ン の 番号 を jxi に 指定 し , 超え て いな か っ た ら 」j を jxi に 指定 する . 

7. L20 へ て 24: M を ゼロ で 初期 化す る 

8. L25: M の うち , 階数 が 1 で 2 番目 の MI[O[I] の み , 式 (3.28) の 第 1 式 の 値 を 代 
人 入 す る . 

9. L26 て 33: 式 (3.28) の 第 2 式 で 2 か ら (階数 -1) まで 繰り 返す サル ー プ で ある . 

10. L27 て 32: 式 (3.28) の 第 2 式 の ルー プ を 繰り 返す 

11. L34 て 38: 規格 化 さ れ た 値 を N に 代入 する . 

12. L40: ゼロ で な い 最 初 の B スプ ライ ン の 位置 を 戻す . 























式 (3.30) の 係数 c, を 決定 する た め に は , デー タ 点 は ヶ + 7 個 必 要 で あり , それ ら の 
値 を 代入 し て , c, に 関す る 連立 方 程 式 



































と ど 十 72. 
2 Set 三 必 (= ニ 1.…, め ) (3.31) 
7ー1 
を 作り , その 解 を 求め あれ ば よい . この 連立 方 程 式 を 行列 表現 する と 
Wc = テッ (3.32) 


罰 








で ある . 1 個 の B スプ ライ ン AM。,(z) が ゼロ で な い 範 囲 は , 節点 5-。 て の 用 
間 で ある か ら , この 係数 行列 W の 各行 の 要素 で ゼロ で な いも の は 高々 妨 個 で ある . 
節点 が デー タ 点 と 重なっ て いる と , その 節点 を 左右 どちら か の 端 の 節点 と する B ス プ 
ライ ン の 値 は ゼロ に な る か ら , ゼロ で な い 要 素 の 数 は 妨 ー1 個 と な り , さら に 人 節点 が 
重複 点 の 場合 に は 1 個 の 場合 も ある . 次 の 「B スプ ライ ン に よる 滑ら か な 関数 の 補間 」 
の 例 で は , 3 次 の スプ ライ ン 関 数 で , 11 個 の デー タ と B ス プラ イン を 使っ て いる . こ 
の 場合 の 係数 行列 Y は 
































O 
O 
O 


O 
O 
O 


/ = o o o (3.33) 


O 
O 
O 


O 
O 
O 
O 





で ある . o 印 が ゼロ で な い 要 素 で あり , 他 は すべ て ゼロ で ある . 節点 の 数 は 15 個 で あ 
り , 両端 は 4 重点 と な っ て いる の で , 最初 の 第 1 行 と 最後 の 第 11 行 に は ゼロ で な い 
要素 が 1 個 ず つ し か な い . 途中 の 第 3 行か ら 第 9 行 ま で は 3 個 で ある が , 3 番目 か ら 
9 番目 で は デー タ 点 と 節点 が 重なっ て いる か ら で あ る . 重なっ て いな い 第 2 行 と 第 10 
行 は 階数 と 同じ 4 個 が ゼロ で な い . また , この よう な 行列 / の 構成 か ら 、 ス プラ イン 
関数 が 局所 的 で ある と いう こと が わか る . すなわち , ラグ ラン ジュ の 公式 (3.6) に お 
いて は , 一 つの ヶ ヵ の 値 に 変化 が あっ た 場合 に , 補間 式 全 体 に 影響 が 及ぶ が , 式 (3.32) 




























































































図 3.7 3 次 の B ス プラ イン に よる 補間 . 関数 は (る ) 
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に お いて は , 一 つの ヵ , の 値 に 変化 が あっ た 場合 に , 直接 影響 を 受け る 解 の c, は 高々 
4 個 で あり 、 他 の 解 の 受け る 影響 は 間接 的 に な る か ら で あ る . 





B スプ ライ ン に よる 滑ら か な 関数 の 補間 
図 3.77 は ド ュ ブ ア ・ コ ックス の アル ゴリ ズム に よる 4 階 ( ヵ =4) の B ス プラ イン 補 
間 の 例 で ある . デー タ 点 の 数 が 11 点 で ある か ら , 式 (3.30) の 和 の 項 は 11 項 で あり , 
11 個 の B スプ ライ ン が 必要 と な る . そこ で , 4 階 の 場合 に は 必要 と する 節点 の 数 は 15 
固 と な る . 最も 左側 の B スプ ライ ン で は , 最も 右側 の 節点 だ けが 補間 領域 に 入り , 他 
の 4 点 は 左側 に 出 て いな けれ ば な ら な い . この こと は , 右側 に つい て も 同じ で あり , 
結局 , 補間 領域 内 部 に 収まる 節点 の 数 は 7 点 と な る . この 例 で は , 補間 領域 外部 の 付 
加 し た 節点 は , 左右 で それ ぞ れ 4 重点 と し て ある . 節点 の 数 と と り 方 に は 制限 が あり , 
デー タ 点 の 個数 ヵ , 内 部 節点 の 個数 >, B スプ ライ ン の 階数 ヵ の 間 に は 関係 み ニ ルッ + 
が な けれ ば な ら な い . また , ホイ ッ ト ニ (Whitney) の 条件 





































































































宛 」 て | に 光 1 二 7x 
(3.34) 
タカ ー。 て の に 7 





を 満足 し な いと , 連立 方 程 式 の 係数 行列 VY に すべ て の 要素 が ゼロ で ある 列 が で き て し 
まい , 連立 方 程 式 が 解け な く な っ て し まう . 


図 37 で の 関数 は 7(@) ニ エーーーjz で あり 、 変動 の わり に デー タ 太 の 数 が 相原 


点 の 近く で は あま り 近 似 が 良く な い . 

プロ グラ ム (Bsphine_Interpolation.java) は 、 ユー ザ が 書く プロ グラ ム か ら 呼 ば れる メ 
ソ ッ ド (bspline_Interpolation) で あり , その 中 で 同じ クラ ス に ある 3 個 の メソ ッ ド を 呼 
ぶよ うに な っ て いる . メソ ッ ド (bspline_Interpolation) と 、 そ の 説明 は 以下 の と お り で 
ある . 



































1 
ー1+(ー33 
o 印 の 11 点 (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10) で あり , 補間 領域 は [0、 10] で ある . 補間 領域 
内 の 節点 は 7 点 (2, 3, 4, 5, 6, 7, 8) で あり , 領域 の 両側 に 付け 加え た 付加 節点 (0, 0, 0, 0) 


> で ある . デー タ 点 は 


























と (10, 10, 10, 10) を 合わ せ て 15 点 で , z 軸 上 に 短い バー で 示さ れ て いる . 点線 は 補間 曲線 
で あり , 実線 は 真 の 曲線 で ある . (Z03_07_Bspline_Interpolation) 
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Bspline_Interpolation.java の メソ ッ ド (bspline_Interpolation) : 


トト + 


中 略 
1nt nxd= xd.1ength : 
double [] c= new doub1e [nxd] : 
doub1e [] [] a= ne doub1e [nxd] [nxd] : 
ke1suu_Gyouretsu(xd, x1, a, 1or) : 
Gauss_Shoukyohou gs= new Gauss_Shoukyohou() : 
c= gs.gauss_Shoukyohou(a,Yydw) 


( 〇 0 の の 喉 の いい 


ーー 
〇 


return hokanchi_keisan(x, , X1, C, 1o エ ) : 


忌 
ト つ 


pub1ic doub1e bsp1ine_Tnterpo]ation(doub1e[] x, double[] Y, 
doub1e[] xi, doub1e[] xdq, double[] yad, int ior) { 


1. L1, 2 て 11: メソ ッ ド bspline_Interpolation の 定義 で ある . 引数 の x は 補間 値 を 
求め る z 座標 の 配列 、y は 補間 値 が 戻さ れる 配列 、 xi は 指定 し た 節点 の 配列 , 
xd は デー タ の sz 座標 の 配列 , yd は デー タ の ヶ 座 標 の 配列 、ior は B ス プラ イン 






































の 階数 で ある . 戻り 値 は 補間 曲線 の 積分 値 で ある . 
L5: c は 補間 式 の B スプ ライ ン の 係数 で ある . 
L6:a は c を 求め る た め の 連 立方 程 式 の 係数 行列 で ある . 























ok ei 1 


L7: メソ ッ ド keisuu_Gyouretsu を 呼ん で , 連立 方 程 式 の 係数 行列 を 作成 する . 
L8,9: クラ ス Ganuss_Shoukyohou の メソ ッ ド gauss_Shoukyohou を 呼ん で , 週 








HLT 


立方 程 式 の 解 c を 求め る . gauss_Shoukyohou は 引数 の 配列 の 値 を 変更 し て し ま 
う の で , 配列 yd の 値 を 作業 用 の 配列 ydw に 前 も っ て コピ ー し て お き , それ を 





























引数 と し て 使っ て いる . 








6. L10: メソ ッ ド hokanchi_keisan を 呼ん で , 指定 し た 配列 x の 座標 値 に 対す る 福 






































間 値 を 配列 y に 求め る . その 際 , 補間 曲線 の 積分 値 が 戻り 値 と し て 




















メソ ッ ド (keisuu_Gyouretsu) と その 説明 は 以下 の と お り で ある . 


Bspline_Interpolation.java の メソ ッ ド (keisuu_Gyouretsu) : 


1 public void keisuu_Gyouretsu(doub1e[] xi, double[] xd, 

の doub1e [] [] a, int ior) { 

3 1nt nxi= xi.]ength: 

4 nt nxd= xd.1ength: 

5 doubl1e [] rn= ne doub1]e [ior] : 

6 mib 細 2C 晶 証 ICO 

7 // デー タ 点 と 節点 の ホイ ッ ト 二 条件 の 検証 

8 for (int =1or: 1< く nxd: 1++) 

9 if (xd[i-1ior] < xi[i] &&k xi[i] < xdq[i] ) continue : 
10 System.out .print]n( "Whitney condition is Vio1]ated") : 
| System . exit(1) : 

12 + 

9 for (int i=0: i<nxd: ュ ++) { // 配列 a の 初期 化 
14 for (int ]j=0: ]<nxd: ]++) て 

15 ai] ]=0.0: 

16 由 

17 | 





戻さ れる . 
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18 Bsp1 bs= new Bsp1() : 

19 for (int =O: 1i<nxd:i ユ ++) て 
20 ixi= bs.bsp1(xd[1] , xi, rn) : 
み jl 1xmO ニ 1X ユ ー1O エ : 

22 for (int k=0: k<ior: k++) 
23 ai] [ixmo+k] =rn [k] : 

24 + 

必 5 + 

26 retuTn : 

27 + 


1. L1, 2 へ 27: メソ ッ ド keisuu_Gyouretsu の 定義 で ある . 引数 の xi は 指定 し た 節点 
の 配列 、xd は デー タ の 座標 の 配列 、 as は 係数 行列 の 2 次 元 配列 、ior は B ス 
プラ イン の 階数 で ある . 

2. L5: デー タ 点 に お ける B スプ ライ ン 値 が 戻さ れる 作業 用 配列 . 

3. L8 て 12: デー タ 点 と 節点 の ホイ ッ ト ニ 条件 の 検証 を する . 違反 し て いた ら , 

を 出し 処理 を 中 断 する . 

L13 て 17: 配列 as を ゼロ に 初期 化す る . 

L18: B スプ ライ ン 値 を 戻す サク ラス の イン スタ ンス を 作成 する . 

L19 て 25: デー タ 点 の 数 だ け ル ー プ を まわ す . 

L20: B スプ ライ ン 値 を 求め ある メソ ッ ド を 呼び , 配列 rm に B ス プラ イン 値 を , 

また , 戻り 値 と し て ゼロ で な い 最 初 の B スプ ライ ン の 番号 を ixi に 得る . 

8. L22 へ 24: 配列 as の し か る べき 要素 に . ゼロ で な い B スプ ライ ン 値 を 代入 する . 



































忠 
喘 
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メソ ッ ド (hakidashihou) は 第 7 章 で 説明 する . メソ ッ ド (hokanchi_keisan) と その 説 
明 は 以下 の と お り で ある . 


Bspline_Interpolation.java の メソ ッ ド (hokanchi_keisan) : 


1 pub1ic doubl]e hokanchi_keisan(doub1le[] x, doub1e[] y, doub1e[] xi, 
2 double[] c, int ior) て 

3 1nt nx= xx.1ength: 

4 1nt nx1= xi.]ength: 

5 1nt nxd= c.1ength: 

6 doubl]e[] rn= new doub1e [ior] : 

7 nt 1x1, ix1mo エ : 

8 Bsp1 bs= new Bsp1() : 

9 for (int ix=O: ix く <nx: 1Xx++) 

10 ixi= bs.bsp1(xlix] , x1, rn): 

11 11mO エ ニー 1X ユ ー1OT: 

(2 y[ix]=0.0: // 係数 と B ス プラ イン の 積 和 
iL) for (int 1=0: 1 く <1or: i++) 

14 ylix] =y[ix]+c [ix1mor+i] *rn [1] : 

15 + 

16 が 

17 doub1e rinteg=0.0: // 積分 値 の 計算 

18 for (int =O: 1i<nxd: ユ ++) て 

19 rinteg= rinteg+(x1 [1+1or] -x1 [1] ) *c[ ュ 1] : 
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20 + 
21 return rinteg/1or: 
2 か が 


1. L1, 2 へ 22: メソ ッ ド hokanchi_keisan の 定義 で ある . 引数 x は 補間 値 を 求め る > 





プラ イン に か か る 係数 , 
積分 値 で ある . 











Sr 選 R S 





座標 の 配列 は 補間 値 が 戻さ れる 配列 、xi は 指定 し た 節点 の 配列 、c は B ス 





ior は B ス プラ イン の 階数 で ある . 戻り 値 ( の 

















L6: 補間 値 を 求め る 点 に お ける B ス プラ イン 値 が 戻さ れる 作業 用 配列 . 
L8: B スプ ライ ン 値 を 戻す クラ ス の イン スタ ンス を 作成 する . 

L9 て 16: 補間 値 を 求め る 点 の 数 だ け 繰 り 返 す . 

L10: B ス プラ イン 値 を 











戻す メソ ッ ド を 呼び , 配列 xrn に B ス プラ イン 値 を , 戻 


り 値 と し て ゼロ で な い 最 初 の B スプ ライ ン の 番号 を ixi に 得る . 


6. L12 て 15: 


補間 値 を 計算 





し , 配列 y に 代入 する . 





7. L17 て 21: 補間 関数 の 積分 値 を 計算 し , 戻り 値 と する . 


拡張 B スプ ライ ン に よる 連続 の ある 関数 の 補間 

















欧 3.8 は > =4 に 微分 値 の 不 連続 が , > = 10 に 関数 値 の 不 連続 が ある 関数 の 場合 


で ある . 不 連続 が ある 場合 の B スプ ライ ン を 拡張 B スプ ライ ン と いう こと が ある. 関 


数 は 


1 














2+ 8(e-2)(eー2) 紅 
| 
げ (Zz) = 1TT CGC-6) (4 <z ヶ <10) (3.35) 
1 
2+p っ こっ 126 っ 1 の 「 7 00S9) 
で ある . デー タ 点 と 節点 は 表 3.3 に 与え られ て いる . デー タ 点 は 25 個 あ り , 節点 は 内 











部 節点 21 個 と 付加 節点 8 個 が ある . 。ー 4 に 微分 値 の 不 続 が ある の で 節点 を 3 重 と 
し , =10 に は 関数 値 の 不 連続 が ある の で 節点 を 4 重 と し て いる 























3.8 3 次 の 拡張 B スプ ラ 


補間 




















線 で あり , 実線 は 真 の 





ン に よる 不 周 
る . デー タ 点 o 印 と z 軸 上 に 短い バー で 示さ れ て いる 節点 は 表 3.3 に 与え られ て いる . 点線 は 


続 な 関数 の 補間 . 関数 は 式 (3.35) に 与え られ て い 


























線 で ある . 





Z03_08_Bspline _Extended) 
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表 3.3 拡 引 












































長 B スプ ライ ン に よる 不 連続 な 関数 の 補間 用 デー タ 点 と 節点 .、 デー タ 点 は 25 個 あ 
り , 節点 は 内 部 節点 21 個 と 付加 節点 8 個 が ある . 

0 1 1.5: 2 25、 3 4 5 9.5.. 6. 6.5、 78 9 9.9) 

デー タ 点 
10.1, 11, 11.5, 12, 12.5, 13, 14, 16, 18, 20 

人 0, 0, 0, 0, 1, 2. 3, 4 4 4, 5.5,。 6, 6.5, 7, 8, 10, 10, 

節点 
10, 10, 11.5, 12, 12.5, 13, 14, 16.5, 20, 20, 20, 20 








B スプ ライ ン に よる 平面 曲線 図形 の 補間 
錠 3.9 は , ⑦ 型 を 作る た め の 23 点 の デー タ 点 (o 印 ) を 指定 し , B 
平面 曲線 図形 の 補間 を 行っ て , ① 型 を 描画 し た も の で ある . 

































































スプ ライ ン に よる 


デー タ 点 は > ヵ とり の 関係 (?,, 放 ) で ある が , 媒介 変数 : を 導入 し て , ァ = ァ (の ), = 





0 20 コ 多 間 変数 の 座標 値 は , 点 (zo, %) 
































か ら 曲 線 に 沿っ て 











計る 距離 を 目安 と し て , , - ジ ye ュー-1)2 十 (一久 1)2 で 定義 する . 表 3.4 は ⑦ 





型 を 作る 23 の デー タ 点 で ある . 





表 3.5 は ⑦ 型 を 作る 19 の 節点 を ーッ ァ (), = ッ ( の の 二 つ の 関数 に 対し て 別々 に 


作っ だ (8, 7 で ある . 


ァ = ィ ァ () は 7= ニ 4.5 で 滑ら か な 関数 で ある が , ッ = ッ () は 7= 4.5 で 失っ た 値 を も っ 
て いる . そこ で , z = ァ (2) に 関す る 節点 は 7 = 4.5 に お いて 重点 と は し て いな い が 











ーッ y ッ (の に 関す る 節点 は #= 4.5 に お いて 3 重点 と し て いる . 7 を 区 
割 し て , = ァ () と り = ッ (0 に つい て . それ ぞ れ 独立 に 補間 法 を 適 
の z, ヶ を 座標 と し て 図 3.9 は 描か われ て いる . 補間 法 を 適用 し た この 
































間 [0.9] で 100 分 
用 し , 同じ ぇ の 値 
図 で は , あま り 滑 





ら か で な い 部 分 も ちあ る が , 後 で 述べ る B スプ ライ ン を 使っ た 図形 作成 法 で は も っ と 滑 














ら か な 型 が 描か れ て いる 











図 3.9 B ス プラ イン 補間 に よる 型 の 描画 . 23 点 の デー タ 点 を 指定 し . B ス プラ イン に よ 
































る 平面 曲線 図形 の 補間 を 行っ た . o 印 は デー タ 点 で ある . 媒介 変数 + を 導入 し て , 














19 の 節点 を 


ァ 三 z(), = テッ (0 の 二 つ の 関数 に 対し て 別々 に と っ た . (Z03_09_Bspline_Heart.java) 
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表 3.4 ⑦ 型 を 作る 23 の デー タ 点 . > と ヶ は 座標 点 で あり , は 媒介 変数 で ある . 





0.00 0.20 0.60 1.00 1.18 1.25 1.10 0.60 
0.55 1.00 1.20 1.10 0.80 0.35 | 一 0.20 | 一 0.80 
0.00 0.49 0.93 1.35 1.70 2.15 2.72 3.50 


ー0.38 | 一 0.20 | 一 0.01 0.00 0.01 0.20 0.38 0.60 
1.08 1.30 1.58 1.62 1.5S8 1.30 1.08 0.80 
3.86 4.14 4.48 4.50 4.52 4.86 5.14 5.50 











B 1.10 1.25 1.18 1.00 0.60 0.20 0.00 
ー0.20 0.35 0.80 1.10 1.20 1.00 0.55 
7 6.28 6.85 7.30 7.65 8.07 8.51 9.00 





























表 3.5 ⑦ 型 を 作る 19 の 節点 . 





0.6 1412.0012613313613914.21447 1 4.5 
0.6 1.2 11812413213814214.31 4.5 4.5 





4453 1 4815115415716417017.6 | 8.4 
4.5 4.7 | 48 15.2158 1 6.6 | 7.2 1 7.8 | 8.4 





























る 
7 
る 
7 





3.5.2 3 次 スプ ライ ン 補 間 


























ここ で は 。, 3 次 関数 が も つ 特 徴 を 使っ た も う 一 つの スプ ライ ン 補 間 式 を 作る . これ 

本 ン と は 異な る スプ ライ ン 関 数 で ある . この 場合 に は 節点 を 
ー タ 点 と 同じ に と っ て お く 必 要 が あり , それ ら を 

0 の 1 で …・ で の 5ー1 (3.36) 








と する . 3 次 の スプ ライ ン 関 数 9(z) と し て , 区 間 [zo, z。_」] で 2 次 導 関 数 まで 連続 で 
あり , し か も 。, 


S(z:) 三 妨 (2 三 0。… 一]) (3.37) 





を 満た す も の を 作る . 3 次 式 で も る か ら 


5(z) = gz? 十 6z27 十 ey 十 の (3.38) 





と 表せ る . まだ 未知 で ある が , 各 節 点 で の 1 次 微 係数 "(z:) を M。 と 置く と , > 
1 2 に お いて , 





5(?) ーー g2 十 6z2 十 cz, 十 9 三 

(zz_1) ニー gz た 」 十 602 た 」 十 en ュ 二 の 三 ュ 

(0 ー se すう s+e= ル 4 (339) 
97(zz_r) 三 3 」 十 っ 0 十 c= 777_1 
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と な る . この 連立 方 程 式 を 解い て 式 (3.38) に 代入 し て 整理 する と , 区 間 [z,_-」, z,| に 
符 ぬ そ 、 





(zzー タ ) 人 12(zー ァ 1) 十 太 ) (3.40) 














ーー 2 十 ニュ ー 3 2z。_-1 十 の 一 3 の 
' (3.41) 
9 の 一 妨 -1 
圭 6 3 (z。 呈 ' あ = 一 2Z) 








で ある . ここ で , 2 次 導 関 数 が 各 節 点 で 連続 で も る と いう 条件 を 課す る と , 点 z, で は , 
87( ァ 一) 本 7(z: 十 ) よ り 




















27-」 447: 6 凌 ー 災 1 
0 | 、 机 7 二 
477。 27:」」 エ 6 半 せ 一 久 
が エー れ 寺 ュ 
と 置け る の で , 
JP 7: 十 5 
計 7 が 1 1 0 太 が 拓 
(3.43) 
と な る . 次 に , 
ん 
Az 三 )。 大 デ 1 一 入 (3.44) 





と 置く と 式 (3.43) は 最終 的 に 








ー の 1 の 2 二 1 一 の 

十 37 ー 6 
が 7 た 3.45) 
夫 、 5 9 


2 な ュ エ 2 な 十 所 4 が ュー 3 学 














と な る . ヵ 個 の 未知 数 77, に 対し て ヵ ー2 の 方 程 式 を 立て た こと に な る . 残る 2 個 の 方 
程 式 を .、?= ニ 0. ヵ ー1. すなわち 両端 で の 端 条件 を 























2 十 /o 人 7 デ 6 
(3.46) 
AA ュ ル 2 十 277。_ ュ = デ 65。ー ュ 
と する こと に よっ て , 式 (3.45) と 式 (3.46) は まとめ られ て , 連立 方 程 式 
4M =b (3.47) 


と な る . ここ で , 4, M, b は それ ぞ れ 
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2 太 0 0 
8 者 0 ル 8o 
25 2 7」 
4 = ,M = ,b ニ 
2 ルー2 4 ル 47,_ 5 5。_ 2 
7。ー 0 一 
AT2 2 ルカ ー2 5 5 
0 AT 2 
(3.48) 








で あり 。, 行列 4 は 3 重 対 角 行列 と な る . 
一 方 . ス プラ イン 関数 が 周期 関数 で あり , その 周期 が (zo, z,。_-」) で ある 場合 に は , 
ヵ ュー ィ ァ 0 と 直 け る か ら , 未知 数 と 方 程 式 の 数 が 1 個 ず つ 減 少し て , 式 (3.48) は 















































2 1 A 
As 。 2 が 5 7 二 
As 2 ル 7。 雇 
人 4 ー ,IM = - ,b = 
| ル 。_。 当 
As-2 。 2 px-2 Ma か ココ 
カー ーー at 2 
(3.49) 











と な る . 行列 4 は 3 重 対 角 の ほか に , 右上 と 左下 の 要素 が ゼロ で な い . 
プロ グラ ム (Spiine3_IntNP.java) の メソ ッ ド (spline3_IntNP) と . その 説明 は 以下 の 
と お り で ある . 連立 方 程 式 の 詳し い 解 法 は , 後 の 第 7 章 に 述べ られ て いる . 




















Spline3_IntNP.java の メソ ッ ド (spline3_IntNP) : 


1 pub1ic void sp1ine3_TntNP(doub1e[] x, doub1e[] y, 
み doub1e bO, doub1e bnm1, doub]1e mu0, doubl1e 1amnm1 , 
8 doub1e[] xd, doub1e[] yd, doub1e[] M) + 

4 nt nxd= xd.1ength: 

5 1nt nx= xx.1ength: 

6 double[] p= new double [nxd] : 

7 double[] q= new double [nxd] : 

8 doub1e[] u= ne doub1e [nxd] : 

9 doub1e[] b= ne doub1e [nxd] : 

10 doubl1e [] mu= new doub1]e [nxd] : 

11 double[] 1am= nevy doub1e [nxd] : 

12 doub1e[] h= new doub1]e [nxd] : 

中 3 doub1e [] M= new doub1e [nxd] : 

14 doub1e x]m1, x], xi,h]1,h]2,h]3: 

15 int ik, jm1, ]: 

16 b[O]= b0: 

17 b [nxd-1]= bnm1: 


18 mu[0]= mu0: 


19 
20 
21 
22 
23 
24 
25 
26 
2/ 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 
54 
55 
56 
57 
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1am [nxd-1]= 1amnm1: 
h[1]= xd[1]-xd[O] : 
for (int 1d=1: 1d<nxd-1: 1d++) て 
h [id+1]= xd[id+1] -xd[id] : 
1am[id]= hlid+1]/(h[id]+h[id+1] ) : 
mu[id]= 1.0-]am[id] : 
b[id]= 3.0*(1am [id]*(yd[id] -yd [id-1] ) /h [id] 
+mu[id] *(yd[id+1]-yd[id] )/h[id+11] ) : 
が 
p[O]= 2.0: 
q[0]=-mu[0] /p[O] : 
u[0]= b[O] /p[0] : 
for (int id=1: id<nxd: 1d++) て 
p[id]= 1am[id] *q[id-1]+2.0: 
q lid] =-mu [id] /p [id] : 
u[id]= (b[id] -1am [id] *u [id-1] ) /p [id] : 
+ 
M[nxd-1] = u[nxd-1] : 
for (int id=nxd-2: 1d>=O: 1d--) 
M[id] = q[id] *M[id+1] +u[id] : 
+ 
for (i=0: 1<nx: 1++) 
メ ュ = X[ ュ ] : 
for (k=1: k<nxd-1: k++) 
if (xi <= xd[k] ) break: 
+ 
J=k: 
]m1= ]-1: 
x]= xd[]] -xi: 
x]m1= xi-xd[]m1] : 
hj1= h[j] : 
1]2= hj1*h]1: 
1]3= hj2*h]j1, 
y[1]= M[jm1] *x]*x]j*x]m1/h]2 
-M[j] *xjm1*x]m1*x]/h]2 
+yd[jm1] *xj*x]*(2.0*x]m1+h]1) /h]3 
+yd[j] *x]m1*x]m1*(2.0*xj+h]j1)/h]3: 





Ll て 3 て 57: メソ ッ ド spline3_IntNP の 定義 で ある . 引数 x は 補間 値 を 求め る 











[ 


ヶ 座標 の 配列 . y は 補間 値 が 戻さ れる 配列 で ある . b0 は 端 条件 











式 (3.46) の 第 1 


式 の 右辺 定数 (0) , bnm1 は 第 2 式 の 右辺 定数 (5。_」) , mu0 は 第 1 式 の 第 2 係 
数 (/o) , 1amnm1 は 第 2 式 の 第 1 係数 (A。_」) で ある . xd は デー タ の ヶ 座 標 の 


配列 yd は デー タ の ヵ 座 標 の 配列 で ある . 
L4: 変数 mxd に デー タ 点 の 数 を 代入 . 
L5: 変数 nx に 補間 値 を 求め る x 点 の 数 を 代入 














L16 て 27: 係数 行列 の と AX, お よび 右辺 の ベク トル b の 要素 を 作る . 対 角 





の 2.0 は L28 と L32 で 使わ れ て いる . 
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図 3.10 3 次 の 非 周期 スプ ライ ン に よる 補間 . 関数 は 7(⑫) 





L28 て 35: 前 進 消去 を 行う . 

L36 て 39: 後退 代入 で 解 M を 求め る 

L40 て 56: 補間 値 を 求め る 点 の 数 だ け ル ー プ を まわ す . 

L42 て 44: 補間 値 を 求め る 点 z の 位置 が どの 節点 (データ 点 と 同一 ) の と ころ に あ 
る か を 調べ る . 

9. L52 て 55: 式 (3.40) の 計算 を し て , 補間 値 を 求め る 


OS 9 8! 








以上 の 手続 き で 連立 方 程 式 を 解き , 式 (3.47) の 7。 を 求め れ ば , 式 (3.40) の 3 次 の 
スプ ライ ン 関 数 が 決定 され る . 図 3.10 は 3 次 の 非 周期 スプ ライ ン に よる 補間 で ある . 


関数 は 図 3.7 と 同じ /(z) = 本 の 2 で ある . 3 次 の B スプ ライ ン を 使っ た 補間 


の 図 3.7 と 比較 する と , この 3 次 の スプ ライ ン 関 数 に よる ほう が 良い よう で ある . 

図 3.11 は 3 次 の 周期 スプ ライ ン に よる 平面 曲線 の 補間 で ある . デー タ 点 と 節点 は 同 
ーー で あり , 図 に は o 印 で 示さ れ て いる . デー タ は 始点 (1.3, 0.0) か ら 反 時 計 回 り に ま 
わり , (1.0, 0.6) , (0.5, 0.8) , (0.0, 0.8) , と 進み , 最後 の ゲー タ は 始点 と 同じ (1.3, 
0.0) で , 13 点 存在 する . 媒介 変数 の + は 0 て 12 の 整数 と し , z() と (2 の 補間 に より , 
平面 曲線 を 求め て いる . 














































































































1 
の デー タ 点 
本 1 デー タ / 














と 節点 は 同一 で , 1 刻み の 11 点 (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10) で あり , o 印 で 示さ れ て い 
る . 点線 は 補間 曲線 で あり , 実線 は 真 の 曲線 で ある . (Z03_10_Spline3_IntNP.java) 

































































図 3.11 3 次 の 周期 スプ ライ ン に よる 平面 曲線 の 補間 . デー タ 点 (z, ヵ ) に , 媒介 変数 : を 対 
応 き せ , z(2⑰) と ?4(9 の 補間 に より , 平面 曲線 を 求め て いる . o 印 が デー タ 点 お よび 節点 で あ 


り 2 










































































実線 が 補間 曲線 で ある . (Z03_11.Spline3_IntP.java) 
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32 
33 
34 














下 の 表 の デー タ を 使っ て 補間 値 の グラ フ を 描け る よう に , プロ グラ ム Z03.03 








-agrange.java を 修正 し な さい . 








0.5 1.0 1.5 2.0 2.5 3.0 3.5 
log z | 一 0.693 | 0.000 | 0.405 | 0.693 | 0.916 | 1.098 | 1.252 
4.0 4.5 5.0 5.5 6.0 6.5 
log 1.386 | 1.504 | 1.609 | 1.704 | 1.791 | 1.871 























解答 例 : ソー スプ ログ ラム Q03_01.Z03_03_1agrange.java 





B ス プラ イン を 使っ た 補間 の プロ グラ ム Z03_07_Bspline_Interpolation.java の 
デー タ 点 と 節点 を 変え て , 補間 の 様子 を 調べ な さい . 





B ス プラ イン を 使っ た 内 挿 の プロ グラ ム Z03_08_Bspline_Extended.java の デー 














タ 点 と 節点 を 変え て , 補間 の 様子 を 調べ な さい . 








3 次 の 非 周期 スプ ライ ン 補 間 の プロ グラ ム Z03_10_Spline3_IntNP.java の デー 


夕 点 を 変え て , 補間 の 様子 を 調べ な さい . 


第 人 章 








方 程 式 の 解法 





4.1 











代数 方 程 式 /(z) = 0 の 根 を 求め る と き , 根 の 公式 が 存在 する 場合 に は それ を 使う 
こと に な る が , 5 次 以上 の 高 次 方 程 式 で は 公式 を 作る こと は 不可 能 で ある と いう こと 
が , 19 世紀 に アー ベル と ガロ ア に よっ て 独立 に 発見 され て いる . 解析 的 な 解 (公式 ) が 
知ら れ て いな いり い 方程式 の 場合 は , 解 と な る z の 値 を 反復 法 や 試行 錯誤 で 求め る こと に 
な る . ある 区 間 で 単調 で 連続 な 関数 7/(z) の 方 程 式 /(z) = 0 に 解 が 1 個 あ る こと が わ 
か っ て いる と き に は , 2 分 法 , 挟み 撃ち 法 。 ニ ュー トン ・ ラ フ ソ ン 法 , 逆 2 次 関数 法 な 
ど が 役に立つ . 複数 の 解 や 特異 点 が 存在 する 可能 性 が ある 場合 に は , これ ら の 方 法 を 
うま く 組 み 合わ せ て 解 を 探し て いく こと に な る . 

































































代数 方 程 式 





2 次 方 程 式 に は 根 の 公式 が あり , 3 次 方 程 式 に は カル ダ ノ 公 式 , 4 次 方 程 式 に は フェ 
ラリ 公式 が ある が , 5 次 以上 の 高 次 方 程 式 の 解 の 公式 は 存在 し な い . ここ で は , 2 次 方 
程 式 の 根 の 公式 と 3 次 方 程 式 の カル ダ ノ 公 式 を 扱う 





4.1.1 2 次 方 程 式 




















2 次 方 程 式 の 根 の 公式 は , 高等 学校 の 数 学 で 真っ 先 に 覚え させ られ る 公式 で あり 
いま さら 解説 の 必要 は な い が , プロ グラ ミン グ 言 語 の 実例 と し て 取り 上 げ る こと に す 
る . 2 次 方 程 式 を 














g22 二 0 十 c 三 0 (4.1) 


と する と , 根 の 公式 は 


ー5 土 V2 一 4gc 6 土 YgZ 
三 ーー 
2 2 





た だ し g= ニ ゲー4gc (4.2) 


で ある . 係数 z, あ c の 値 に よっ て いろ いろ の 場合 が ある の で , この 式 を その まま プロ 
グラ ム の 中 に 書け ば よい の は 数 式 処理 が で きる 特殊 な 言語 だ け で あり , 一 般 の プロ グ 
ラミ ング 言語 で は ,. きち ん と 場合 分 け を し て 書か な けれ ば な ら な い . それ は , 
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e 交 0 g>0 2 実 根 : ヶ = ーー 

=0 等 根 s= デ 

gd<0 2 複素 共役 根 : ニー ニ 0 (4.3) 
g 三 0 56 デ 0 タニー ェ 


56=0 c デ 0 不能 ( 解 な し ) 
c 三 0 不定 (すべ て が 解 ) 
で ある . 2 実 根 を 求め る 際 に , 2 に 比べ 4gc の 値 が 非常 に 小さ い 場合 に は , 5> 0 な ら 
1 三 ち ーV の 一 4gc. 65<0 な ら zi= ニ 5 十 V2ー4gc の 計算 で 桁 落 ちの 誤差 が 大 きく な 




















4gc 4gc 
る . そこ で , 分 子 の 有理 化 を し て z」 = - 一 一 テー また は yz」 = ーー テー と す 
分 子 の 有理 化 を し て z」 ニー ラー ョ ーーー あー 





る か , ある い は , も う 片 方 の 解 z。 を 最初 に 求め て か ら , それ を 使っ て 解 z」 ニー を 
2 
求め る よう に し な けれ ば な ら な い . 
NijiHouteishiki.java の クラ ス と その 説明 は 以下 の と お り で ある . 


NijiHouteishiki.java の クラ ス : 


1 pub1ic cl1ass Ni]iHouteishiki+ 


2 public Ni]jiHouteishik1i_Answer 

8 ni]iHouteishiki(doub1le a, doubl1e b, doub1e c) t 
4 Ni]jiHouteishiki_Answer anSs = new Ni]jiHoute1shik1i_Answer() : 
め doub]e x, d: 

6 if (a != 0) { 

7 9 所 S9  @ / 己 Se 

8 si ((@ | 三 ⑳⑩) て 

9 b /=2,: d=b*b- co: 

10 if (d > 0) て 

11 nh 細 (D 記 >0 ひ り 呈 1 

12 x = -b - Math.sqrt(d) : 

13 } e1se 

14 x = -b + Math.sqrt(d) : 

5 + 

16 ans .kon= " 二 実 根 ": 

17 ans.kai[0]= x: 

18 ans.kai[1]= c/x: 

19 SMGEEGNa(oOl5gjeheatmgll(Asz M rss キリ WM。 や Ge/ %)8 
20 + else if (d<0) { 

21 ans.kon= " 二 複 素 根 ": 

ウ ans.kai[0]= -b: 

23 ans .kai[1]= Math.sqrt(-d) : 

24 System.out .print1n("x = リ + (-b) + リ + ォ ー リ 
25 + Math.sqrt(-d) + " 1 リ 9): 

26 + e1]se 

27 ans.kon= "重根 ": 

28 ans.kai[0]= -b: 


29 ans.kai[1]= 0: 





System.out .print1n("x = リ + (-b) + "( 重 解 )") : 





LU 圭 (-b) 十 U 0) 語 


ゃ (Ce@ / 9》8 


L2, 3 て 55: 戻り 値 が NijiHouteishiki_Answer 型 の メソ ッ ド mijiHouteishiki の 定 
義 asa は 2 次 方 程 式 zz3 巡 二 c= ニ 0 の >z2? の 項 の 係数 . b は z の 項 の 係数 、c 





使う クラ ス NijiHouteishiki_Answer の イン スタ 


L7: ゼロ で な か っ た ら , 2 次 方 程 式 で あり , 式 を a で 割っ て z? の 項 の 係数 が 1 





形式 に する . 


L9: ゼロ で な か っ た ら , 2 次 方 程 式 の 判別 式 を d に 作る . b を 2 で 割り 方 程 式 を 






































ロ か で , それ ぞ れ の 処理 を する . 


























L11: 判別 式 が 正 で あっ た ら , 桁 落 ち を 防ぐ 処理 の た め に b の 正負 を 調べ る . 




















vgd の 計算 を する . 


L16: ほか で 使う た め に NijiHouteishiki_Answer クラ ス の イン スタ ンス ans の 文 
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30 
31 + 
32 } else { 
33 ans.kon= " 二 実 根 ": 
34 ans.kai[0]= -b: 
35 ans.kai[1]= 0: 
36 System.out .print]n("x = 
37 が 
38 + else if (b != 0) { 
39 ans.kon= " 単 一 根 ": 
40 ans .kai [0]= -c/b: 
41 ans.kai[1]= 0: 
42 System.out .print]n("x = リ " 
43 } el1se if (c != 0) 
44 ans.kon= " 解 な し ": 
45 ans.kai[0]= 0: 
46 ans.kai[1]= 0: 
47 System.out .print1n(" 解 な し り ): 
48 } e1se 
49 ans.kon= 『 解 不定 ": 
50 ans.kai[0]= 0: 
51 ans.kai[1]= 0: 
52 System.out .print1n(" 解 不定 ") : 
53 
54 return an8: 
55 開 際 ) 
56 + 
1. L1 へ 56: クラ ス NijiHouteishiki の 定義 . 
2. 
は 定数 項 で ある . 
3. 4: 2 次 方 程 式 の 根 を 返す と き に 
ンス ans の 作成 . 
4. L6: a が ゼロ か どう か の 判定 . 
5 
で ある 方 程 式 z2 上 gz 二 c= ニ 0 の 月 
6. L8: c が ゼロ か どう か の 判定 . 
Ms 
2 上 2pz 二 c 王 0 の 形式 に する . 
8. L10, 20, 26: 判別 式 が 正 か 負 か ゼ 
9. 
10. L12: b が 正 で あっ た ら , 解 -pー 
11. L14: b が 正 で な か っ た ら , 解 5 二 VZ の 計算 を する . 
12. 
字 列 kon に “一 重根 " を 代入 する . 
13. L17: ans の 配列 kai[0] に 根 の x を 代入 する . 
14. 





L18: ans の 配列 kail1] に も う 一 つの 根 c/x を 代入 する . 
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15. L19: 根 の 情報 を キモ ニタ ー に 出力 する . 

16. L21 へ 25: 判別 式 が 負 で あっ た ら , “一 複素 根 ” の 計算 と 出力 を する . 

17. L27 て 30: 判別 式 が ゼロ で あっ た ら , “ 二 重 根 "の 計算 と 出力 を する . 

18. L33 て 36: c が ゼロ で あっ た ら , 二 実 根 ” (ゼロ と 1 実 根 ) の 計算 と 出力 を する 
19. L39 て 42: a が ゼロ で b が ゼロ で な けれ ば , " 単 一 根 ” の 計算 と 出力 を する 
20. L44 て 47: a と b が ゼロ で c が ゼロ で な けれ ば , " 解 な し "の 出力 を する 
21. L49 て 52:a と b と c が ゼロ で ある な ら ば , " 解 不定 ” の 出力 を する 

22. L54: NijiHouteishiki_Answer クラ ス の イン スタ ンス ans を 返す . 












































NijiHouteishiki_Answer.java の クラ ス と その 説明 は 以下 の と お り で ある . 


NijiHouteishiki_Answer.java の クラ ス : 
1 pub1ic cl1ass Ni]jiHouteishik1_Answer て 
2 public String kon: 
3 public doubl1e[] kai= new doub1e[2] : 
4 } 


1. L1 て 4: クラ ス NijiHouteishiki_Answer の 定義 の 始ま り . nijiHouteishiki か ら の 
戻り 値 に 使う この クラ ス は メソ ッ ド の 定義 を 含ん で お ら ず , Fortran の 構造 体 
に 似 て いる . 

L2: 根 の 種類 を 返す た め の 文 字 列 の 宣言 を する . 

L3: 2 根 の 数 値 を 返す た め の 配 列 を 作る 











4.1.2 3 次 方 程 式 ( カ ル ダ ノ 公式 ) 
3 次 方 程 式 の 一 般 型 は 


2 上 py" 十 ce 二 9=0 (4.4) 

















と する こと が で きる . 左辺 の 変 曲 点 を 0 に 移す よう に , 変換 ッ ニ メー ュ を 使う と 
式 (4.4) は 2 次 の 項 が な い 式 


ec の pc 26 
5 9, 9 9 十 (4.5) 


に する こと が で きる . さら に , "ニッ を 代入 し て 








9 上 3py/ 90 た だ し ゅ ゎ 





の 上 の 二 3wo(w 十 9) 十 3p( 二 の) 二 g9=0 (4.6) 


と する . 次 に 、 4 の ニ ーg と 置く と , 4 ニーp と な り , 4%o は 連立 方 程 式 


2 十 の 9 ニーg 
(4.7) 





3 の 9 王 一 の 
か ら 求 め る こと が で きる . これ は , 2 次 方 程 式 の 根 と 係数 の 関係 に な っ て いる か ら 
と?? は 2 次 方 程 式 

だ 5 6 ーー の ? =0 (4.8) 


の 2 根 で ある . それ ら は , 
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れ テ 5 (-9+ 9* 十 4 ) 4 
1 (4.9) 
な (-9- V@ の + 4 ) ー の 
で ある . そこ で , 3 次 方 程 式 の 根 z は 
ー タ 丘 + め ち ー ュ 
Ns 2V 3 ヵ 
ニー テ (9 后 0 (a- 6) (410 
 : 3 ヵ 
mg ニー テ (95+ 9 (- 
と し て 求め る こと が で きる . 根 の 性 質 は 式 (4.9) の 判別 式 2 + 4p? で 分 類する こと に 











な る . 


ロ 7? 十 49>0 
ね , ち は 実数 で あり , 五 , ダ ら と し て ね, ちの 実 の 立方 根 を と る と , x」 は 実 
根 で ある が >z。, zs は 共役 な 複素 根 と な る . 

ロ 7? 十 499 <0 
ね , 6 は 共役 な 複素 根 で あり , それ ら の 立方 根 の 和 は 実数 . 差 は 虚数 と な る の 
で , zi だ け で は な く xs, zs も 実 根 と な る . 立方 根 は それ ぞ れ 3 種類 ある が , 
実際 の プロ グラ ム で は 極 形 式 を 使っ て 偏 角 が = の 立方 根 か ら 求め る よう に 
統一 し て ある . 

ロ 7? 十 499 =0 
方 程 式 (4.8) の 解 は 等 根 』 = で あり , z。, zs も 実 の 等 根 と な る . 







































































4.2 節 で 使う 方 程 式 (z ヶ +1.3)3-4.0 = 0 に 当て は め る と , 3 根 0.5214, 一 2.2107 土 0.6987, 
が 求め られ る . 

プロ グラ ム (SanjiHouteishiki.java) の メソ ッ ド (SanjiHouteishiki) の 一 部 と , その 説 
明 は 以下 の と お り で ある . 








B 


SanjiHouteishiki.java の メソ ッ ド (SanjiHlouteishiki) の 一 部 : 
pub]ic Complex[] san]jiHouteishiki(doub1e b ,doub1e c, double d) { 
Comp1ex[] ans= new Complex[3] : 


1 
ウ 
3 Comp1ex zero = new Complex(0.0, 0.0): 
4 後略 








1. Ll: 戻り 値 が Complex 型 配列 の メソ ッ ド sanjiHouteishiki の 定義 で ある . 引 
数 の b は 3 次 方 程 式 の z2 の 項 の 係数 、c は z の 項 の 係数 、 d は 定数 項 で ある . 

2. L2: 戻り 値 の た め の Complex 型 配列 ans の イン スタ ンス を 作成 する . 

3. L3: Complex 型 の イン スタ ンス zero を 作成 し , 複素 数 の ゼロ を 定義 する . 

4. L4: 以下 は , 本 文 で の 解説 の と お り で ある . 
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4.2 2 分 法 











関数 ヵ = 7(z) は 2 点 zin と za で 尋 符 号 で あり , その 2 点 間 で は 連続 で , 方 程 
式 7(z) = 0 に 解 が ある こと が わか っ て いる も の と する . 解 を 求め ある に は , まず , 両端 
の 座標 値 2 z。 を 変数 zi。。, zu。 に 代入 し て , それ ぞ れ の 関数 値 (zi。。) げ (2。) 
を 求め る . その 2 点 の 間 に 解 が ある の だ か ら , (zij。。)7(zup) < 0 で ある . 次 に 両端 の 
中 点 の 値 を 変数 >。 に 代入 し , その 点 を 解 の 推定 値 と し て 関数 値 7(zi。) を 求め る . 
げ (znia) が (zo) と 同 符号 。 げ (zo。) (za) > 0 な ら ば , 解 は >。。 と zu。 の 間 に あ 
る か ら , ziia の 値 を 変数 。。 に 代入 し , 異 符号 、 げ (zi。。)7(za) く 0 な ら ば , 解 は 
ziow と zia の 問 に ある の だ か ら , zia の 値 を 変数 z。。 に 代入 する . 同じ 操作 を 繰り 
返し て zia の 値 が 収束 条件 の 精度 以内 で 定まっ た ら , それ を 解 と する . 図 41 は 2 分 
法 で 関数 7(z) = (z 1.3)? - 4.0 = 0 の 解 を -1.0 と 1.0 の 間 で 求め る と き の 収 東 過程 
を 示す も の で ある . 実線 の 曲線 は 関数 で あり , 最上 の 直線 は 最初 の と za。 の 位 
置 を 結ん だ も の で あり , 中 央 の * 印 は zia の 位置 で も る . それ より 下 の 直 線 は , 順に 
ziow と zup の 位置 を 結ん だ も の で , 10 回 まで 示し て あり , 収束 の 仕方 が わか る . 2 分 
法 を 10 回 進め た こと で 解 の 精度 は 約 3 桁 、(z。。 一 mm)/1000 に な っ て いる . 

2 分 法 に より 解 を 1 個 だ け 探 すこ と の で きる プロ グラ ム (Nibunhou.java) の メソ ッ 
ド (nibunhou) と , その 説明 は 以下 の と お り で ある . 


























































































































Nibunhou.java の メソ ッ ド (nibunhou) : 


pub1ic doub1e nibunhou(doub]e xmin, doub]e xmax, MyFunction  , 
doub]e eps) て 
doubl1e x1ow, XuDp, xm1d: 
double yl1ow, YuD, 7m1d: 


1 

2 

3 

4 

5 epS= epS*(xmax-xmin) : 
6 xl1oW= xm1n: 

ii XuD ニ = Xxmax: 

8 xmid= 0.0: 

@) ylow= f .function(x1oV) : 


10 yup= f.function(xup) : 




















4.1 2 分 法 で 解 を 求め る と き の 収 東 過程 . 実線 の 曲線 は 関数 で あり , 最上 の 直線 は 最初 の 
zin と max の 位置 を 結ん だ も の , 以下 順に zi。。 と z。。 の 位置 を 結ん だ も の で , 10 回 まで 示 
し て ある . 
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11 if (y1ow*yup > 0) { 
12 System.out .print1n("ERROR: ymin*ymax > 0!"): 
13 return 0.0: 
14 ゅ 
中 誠 for (int =0: 1<30: ュ ++) { 
16 xmid= (xup+x1ow) /2: 
17 ym1d= f.function(xmid) : 
18 if (ylow*ymid > 0) て 
19 xlow= xm1d: 
20 ylow= ymid: 
21 } e1se { 
ウ Xup= Xxm1d: 
23 Yup= ym1d: 
24 + 
25 if (Math.abs(xup-x1ow) く eps) break : 
26 了 
27 return xm1d: 
9 か ょ 
1. L1, 2 て 28: メソ ッ ド mbunhou の 定義 で ある . 引数 の xmin, xmax は 解 を 探す 範 
の 下限 と 上 限 , f は イン タフ ェ ー ス MyEunction クラ ス の イン スタ ンス で あり , 
解 を 求め る メソ ッ ド が 定義 きれ て いる . eps は 解 の 精度 の 半 値 で (Gxmax-xmin) 
に 対す る 相対 値 で ある . 戻り 値 は 解 で ある . 
2. L5: (Gxmax-xmin) に 対す る 相対 値 で 与え られ た 半値 eps の 値 を , 相対 値 で な く 
絶対 値 に する . 
3. L6 て 10: xlow, xup, xmid, ylow, yup に 初期 値 を 代入 する . 
4. L11 て 14: ylow*yup>0 で あっ た ら 解 が な いか も し れ な いか ら , 警告 を 出し て 終 
了 す る . 
5. L15 て 26: 2 分 法 を 最大 30 回 繰り 返す . 
6. L16, 17: xmid, ymid に 新しい 2 分 点 で の 値 を 代入 する . 
7. L18: ylow*ymid の 正負 を 調べ る . 
8. L19, 20: 正 で あっ た ら , 解 は xup 側 に ある か ら , xmid, ymid の 値 を xlow, ylow 
に 代入 する . 
9. L22, 23: 正 で な か っ た ら , 解 は xlow 側 に ある か ら , xmid, ymid の 値 を xup, 
yup に 代入 する . 
10. L25: 解 が 存在 する 範囲 xnp-xlow が eps 以下 に な っ た ら ル ー プ を 抜け 出す . 
11. L27: 解 と し て xmid を 戻す . 
4.3 挟み 撃ち 法 








この 方 法 は レギ ュ ラ ・ フ ァ ル シ 法 と も いわ れる . 2 分 法 で は 解 の 推定 値 と し て 両端 





























0 沈 1 の 中 点 


1 
2 三 ぅ (zo 填 ) (4.11) 


4.3 挟み 撃ち 法 





























を 使っ た が , 挟み 撃ち 法 で は , 両端 zo, zi」 で の 関数 値 の 座標 点 を 直線 で 結び その 直 


線 と z 軸 と の 交点 


1 が (zo) 一 zo7(z1) 
(zo) 一 が z) 


1 
三 ぅ eo 十 1 ) 十 





の 5 三 


zo 一 wi zo) 十 九 %) 
(zo) 一 が %) 2 
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(4.12) 


を 解 の 推定 値 y。 と する 方 法 で ある . 式 (4.12) の 第 2 右辺 の 第 1 項 は 2 分 法 の 項 で あ 
り , 第 2 項 が 近似 を 高め る 補正 項 と な っ て いる . この 場合 は zo か >」 の どちら か で , 











関数 値 が 7(z。) と 異 符号 で ある . それ を z」 で ある と する . この 操作 


を げ () タル (Z。) 
(pr) ey) 








(4.13) 


を 反復 し て 根 に 近づく こと に な る . Az」= ニ ァ ュ ーg, Az ニーcog と 置い て , 解 ? で の 


げ (z) の テー ラー 展開 


7/ 


久 デ げ (o)Az: 十 の Aas 中 


9o デパ (2)Az 二 


を 使う と , 式 (4.13) か ら 
"(9) 


の オ 1 ュー 十 Ai 人 9 うる) 
と な る . さら に 。 を 移行 する と 
が '(@) 
Zi+1 ュ ー@ ビ AZi+1 An 人 Am 





と な る か ら , Azi が 








2 ア (@ 





(4.14) 


(4.15) 


(4.16) 


が 
As 9) | < 1 と な る 程度 小さ く な っ て いれ ば Az』」 < Az で 


あり , この 反復 は 収束 する こと に な る . 図 4.2 は 挟み 撃ち 法 で 関数 了 (z) = ( 十 1.3)# 一 











4.0 の 解 を -1.0 と 1.0 の 間 で 求め る と き の 収 束 過程 を 示す も の で ある . 実線 の 








曲線 は 





関数 で あり , 点線 は 次 の 予測 値 >。 と その 次 の 予測 値 z。 を 求め る 1 次 式 で ある . 


最上 


の 直線 は 最初 の z。 と z」 の 位置 を 結ん だ も の , 以下 順に z。 と 1, z。 と zi の 位置 を 結 























図 4.2 挟み 撃ち 法 で 解 を 求め る と き の 収 東 過程 . 太い 実 曲 線 は 関数 で あり , 点線 は 次 の 予測 
値 x。 と その 次 の 予測 値 を 求め る 1 次 式 で ある . 最上 の 細い 実直 線 は 最初 の zo と z」 の 位置 を 
結ん だ も の , 以下 順に 2 と 1, 宛 3 と の 1 の 位置 を 結ん だ も の で , 10 日 まで 示し て ある . 
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ん だ も の で あり , 10 回 まで 示し て ある の で 収束 し て いく 過程 が わか る . 10 回 進め た と 
ころ で 解 の 精度 は 約 4 桁 に な っ て お り , 2 分 法 よ り 1 桁 良い . 

この 例 の 場合 は , 挟み 撃ち の 右側 の 点 は 常に z, で あっ た が , [zo, z」] の 範囲 内 に 
変 曲 点 が ある 関数 の 場合 に は , 両側 の 点 が 移動 する こと も ある . また , 解 と な る 点 
g で (gz) = 0 で ある 関数 の 場合 は , 先 の 収束 条件 を 満た さ な い の で , 解 は 求め られ 










































































挟み 撃ち 法 に より 解 を 1 個 だ け 探 すこ と の で きる プロ グラ ム (Hasamiuchi.java) の 
メソ ッ ド (hasamiuchi) と 。 そ の 説明 は 以下 の と お り で ある . 


Hasamiuchi.java の メソ ッ ド (hasamiuchi) : 


1 pub1ic static double hasamiuchi(doub1e xmin, doub]e xmax, 
2 MyFunction f, doubl]e eps) { 
3 epS= eDS*(xmax-xm1n) : 
4 doub]e xnxt=0O.0, fmin, fmax , fnxt: 
5 fmin = f.function(xmin) : 
6 fmax = エ .function(xmax) : 
7 if (fmin*fmax > 0) 
8 System.out .print1n("ERROUR: fmin*fmax > 0!"): 
9 return 0.0: 
10 + 
11 for (int i=0: 1<30: ュ ++) 
12 xnxt = (xmin*fmax-xmax* エ m1n) / (fmax-fmin) : 
SI fnxt = エ .function(xnxt) : 
14 if (Math.abs(xnxt-xmin)<eps || Math.abs(xmax-xnxt) く eps) break: 
15 (esmi5ib 本 三 三 量 ) 
16 break: 
17 } e1se if (fmin*fnxt > 0) 
18 Xxm1n = xnmx: 
19 fm1in = fnxt: 
20 } e1se 
中 XmaXx 三 XnX: 
22 fmax = fnxt: 
23 + 
24 + 
25 return XnXt: 
29 


1. L1, 2 て 26: メソ ッ ド hasamiuchi の 定義 で ある . 引数 の xmin, xmax は 解 を 
探す 範囲 の 下限 と 上 限 。f は イン タフ ェ ー ス MyEFunction クラ ス の イン スタ ン 
ス で あり , 解 を 求め ある メソ ッ ド が 定義 きれ て いる . eps は 解 の 精度 の 関 値 で 
(xmax-xmin) に 対す る 相対 値 で ある . 戻り 値 は 解 で ある . 

2. L3: (xmax-xmin) に 対す る 相対 値 で 与え られ た 関 値 eps の 値 を , 相対 値 か ら 絶 
対 値 に する . 

.。 L5, 6: fmin, fmax に 初期 値 を 代入 する . 

4. L7 て 10: hmin*fmax>0 で あっ た ら 解 が な いか も し れ な いか ら , 警告 を 出し て 終 
了 す る . 

5. L11 て 24: 挟み 撃ち 法 を 最大 30 回 繰り 返す . 
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6. L12, 13: xnxt, fnxt に 新しい 値 を 代入 する . 

7. L14: xnxt が xmin ある い は xmax に eps より 近づい た ら , それ が 解 で ある か 
ら , ルー プ を 抜け る . 

8. L15, 16: fnxt が ゼロ で あっ た ら , xnxt が 解 で や る か ら , ルー プ を 抜け る . 

9. L17 て 19: fmin*fnxt が 正 で あっ た ら , 解 は xmax 側 と た あ る か ら , xnxt, fnxt の 
値 を xmin, fmin に 代入 する . 

10. L21, 22: 正 で な か っ た ら , 解 は xmin 側 に ある か ら , xnxt, fnxt の 値 を xmax, 
fmax に 代入 する . 

11. L25: 解 と し て xnxt を 戻す . 








反復 法 





解 を 求め る 方 程 式 /(Z) = 0 を 変形 し て > = g(?>) と し た と き , z の ある 値 zp か ら 出 
発し て , 演算 


ga ュー9(Z) (2 三 0,1,…・) (4.17) 








を 繰り 返す と , im z, が oc に 収束 すれ ば , その 収束 値 が 方 程 式 7/(z) = 0 の 解 ? で あ 
る . を 式 (4.17) に 代入 する と = (<) で ある か ら , ッ = 9(z) と 置い て zz ニッ で テー 
ーー 展開 す る と , 











N 


リーgー の (9 の (ー の オーeー の 7 アキ … 8 





で ある . 途中 の 推定 値 々 が ヵ に 近づい て お り |z 一 | が 小さ けれ ば , | の (<)| < 1 の と 
き に は 収束 する こと に な る . そこ で , | の (<)| < 1 と な る よう な 関数 ?(z) を , 元 の 関数 
げ (z) か ら 作 る こと が で きれ ば よい こと に な る . 式 (4.18) で , の (<) 交 0 の 場合 は > に 関 
する 1 次 の 反復 で ちあ る. また , 階 以下 の 微分 は ゼロ で あり , 7 階 の 微分 に な っ て 初 
め て ゼロ で な く な る 場合 に は , 次 の 反復 と な る . 先 に 述べ た 挟み 撃ち 法 は 1 次 の 反 
復 に あたる . 



































4.4.1 ニュ ー ト ン ・ ラ フ ソ ン 法 


関数 /( ヶ ) と その 導 関 数 (>) が 与え られ て いる と き に ., 方 程 式 /(>) = 0 の 解 を 求 
め る 方 法 で ある . まず , 適当 な 出発 点 zo を 与え , 座標 (zo, げ (co)) で , 関数 7/(z) に 
接する 接線 と z 軸 と の 交点 























ア 1 三 70 一 (so) (4.19) 
を 解 の 推定 値 と し て 求め る . さら に , 収束 する まで 
lim zz, 三 7- ュ 1ー (ei (4.20) 





2 つ eo (zz- ュ ) 
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を 繰り 返す と 解 が 求め られ る . 導 関 数 /'(z) が 解析 的 に わか っ て いる 場合 に は , それ 
を 使え ば よい が , わか っ て いな いらい 場合 に は 関数 /(z) を 数 値 的 に 微分 する こと で も よ 
い . すなわち , Az を 適当 に 小さ く と っ て , 次 の 近似 


げ (zo 十 Az) 一 (zo 一 Az) 

















(ze) 一 の (4.21) 
を 使う こと も で きる 
この 場合 , 式 (4.20) は 
りー 9(?) ニタ? 計り (4.22) 


で ある . この 式 を テー ラー 展開 の 式 (4.18) に 当て は め る こと に する . 関数 2(z) の 1 次 
導 関 数 と 2 次 導 関 数 は 























ん ュー が (9 - 7 の"(G) 7 の (の 
((z))2 ( げ (?))2 
(4.23) 
衣 條 ) 全 げ (?)"( ) 」 ず が 者 (og) 
( げ (?))* ( げ (?))* ( げ (?)) 
で ある か ら 、7( の ) =0。 の (<) 3 を 使う と 、 ア (の) 0 (< が 重根 で な い ) な ら ば 
タリー@ 三 だ (9 (ーー@)7 十 … (4.24) 





2 が (9) 
と な る . これ は yz に 関す る 2 次 の 反復 で ある か ら 収 束 は 速い しかし, (<) = 0, 
(<) 0 で ある 場合 に は 


_ jm 7) だ で) 上 jm 1 げ (⑦) だ が) 7 の) が ⑭)) 
9 60 lnn ((z))* hm 2(?)(?) 


ぴー ナ C 4/2 


1 ilm 7(e"(@) 
ー 2 2lm げ 7) MM 


1 in げ (@ 々 ) げ ア "(Z ) げ (Z 62 )} 1 


)/ 
2 2 jmt( げ '(@)7+ ア (@@)) 2 


と な る の で (oc) の 項 が 残る こと に な り , 展開 は 

















リーgー 2ー の キー (4.26) 





と な っ て , 1 次 の 反復 に 戻っ て し まう . 

図 4.3 は 関数 (>) = (z+1.3)3 4.0 の 解 を , 1.0 を 始点 と し て ニュ ー ト ン ・ ラ フ ソ ン 
法 で 求め る と き の 収 東 過程 を 示す も の で ある . 実線 の 曲線 は 関数 で あり , 破線 は 次 の 
予測 値 z. と その 次 の 予測 値 z。 を 求め る 1 次 式 で ある . 最上 の 細い 実直 線 は 最初 の z。 
と zi の 位置 を 結ん だ も の , 以下 順に z」 と z。, z。 と zs の 位置 を 結ん だ も の で , 6 桁 
収束 する 5 回 まで 示し て ある . 
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図 443 ニュ ー ト ン ・ ラ フ ソ ン 法 で 解 を 求め る と き の 収 束 過程 . 実線 の 曲線 は 関数 で あり , 破 


線 は 次 の 予 滑 


zo と zi の 


と 
D/ 





収束 する 5 























値 z』」 と その 次 の 予測 値 z>。 を 求め る 1 次 式 で ある . 最上 の 細い 実直 線 は 最初 の 
置 を 結ん だ も の , 以下 順に 空 1 と 2, 宛 2 所 の 3 の 位置 を 結ん だ も の で あ 。 6 桁 











ロ 





まで 示し て ある . 








挟み 撃ち 法 で も ニュ ー ト ン ・ ラ フ ソ ン 法 で も , 予測 値 は と も に 近似 1 次 式 が ゼロ と な 





る 値 で ある が , ニュ ー ト ン ・ ラ フ ソ ン 法 の 場合 に は 予測 値 の 式 (4.22) (>) = ェ - の 


ア (⑫ り 





の 1 階 微分 が ゼロ に な る よう に な っ て いる か ら , 収束 が 速い の で ある . し か し , 初期 
値 の z。 の 選び 方 が 良く な いと 発散 し て し まう の で , 注意 が 必要 で ある . 

ニュ ー ト ン ・ ラ フ ソ ン 法 に より 単調 な 関数 の 方 程 式 の 解 を 1 個 探 すこ と の で きる プ 
ログ ラム (NewtonRaphson.java) の メソ ッ ド (newtonRaphson) と , その 説明 は 以下 の 
と お り で ある . 














NewtonRaphson.java の メソ ッ ド (newtonRaphson) : 


1 
2 
3 
4 
5 
6 
7 
8 
9 


10 
11 


pub1ic static doub]e newtonRaphson(doub1e x, 
MyFunction f, MyFunction df, doub]e eps) t 
doubl]e fn, dfn: 
for (int i=0: 1<30: ュ ++) 

fn = f.function(x) : 
if (Math.abs(fn) <= eps) break: 
dfn = df.function(x) : 
メ = x-fn/dfn: 
サザ 
return X: 


+ 











1. L1, 2 て 11: メソ ッ ド newtonRaphson の 定義 で ある . 引数 の x は 解 を 探す 初期 
値 ,f は イン タフ ェ ー ス MyFunction クラ ス の イン スタ ンス で あり , 解 を 求め る 
関数 が 定義 され て いる . df で は 同じ く 導 関数 が 定義 きれ て いる . eps は 解 の 関数 
値 の 精度 の 隊 値 で ある . 戻り 値 は 解 で ある . 
L4^ て 9: ニュ ー ト ン ・ ラ フ ソ ン 法 を 最大 30 回 繰り 返す . 

L5: x に お ける 関数 値 生 を 計算 する . 

L6: fn の 絶対 値 が eps より 小さ く な っ た ら , ルー プ を 抜け る . 

L7: 導 関 数 の 値 dm を 計算 する . 

L8: ニュ ー ト ン ・ ラ フ ソ ン 法 の 次 の 予測 値 を 計算 し . ルー プ を 繰り 返す . 
L10: 解 の x を 戻す . 
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4.4.2 反復 法 の 一 般 論 





反復 法 の 一 般 論 を 使う と ニュー トン ・ ラ フ ソ ン 法 の 場合 の 予測 値 の 式 (4.22) は , 
解 ?。 に お いて その 1 階 微分 が ゼロ に な る よう に 作ら れ て いる , と いう こと が わか 
る . 反復 法 は , 解 を 求め る 方 程 式 7(z) = 0 を 変形 し て z = 7(z) と し , z の ある 値 
zo か ら 出 発し て , 式 (4.17) を 繰り 返し 、 ある 値 。 に 収束 すれ ば , その 収束 値 が 方 程 式 
げ (Z) = 0 の 解 で ある と する 方 法 で ある . > = 9(z) の 解 は りー ニ ァ と ッ ? ヶ = 9g(z) の 交点 で 
ある か ら , 反復 の 過程 を 図 に 描く と , 図 4.4 左 と な る . この 図 の 例 で は z。 か ら 始 め て 
w1, 2) P5 と いう 具合 に 交点 4 に 向かっ て 収束 し て いく . 一 般 的 に 関数 ?(z) が 交 
点 を 中 心 と し て z 軸 方 向 か ら 45? の 範囲 に 収まっ て いる 場合 に 収束 する こと が わか 
る . 収束 を より 速く する た め に は , 図 4.4 右 の よう に , 9(z) が 交点 で 軸 に 平行 」 す 
な わ ち , の (2) = ミ 0 と な る よう に 選ぶ こと で ある . 

ニュ ー ト ン ・ ラ フ ソ ン 法 で は ,、 その よう に する た め 





























































































































9(z) ニタ ァ 十 (る )Z) (4.27) 


と し て ヵ (z) を 決め る . それ に は , の (c) = 0 と する た め の 条件 





Hm の (⑦) 1 十 ヵ (@ の (2) =0 (4.28) 


か られ (e) ニー と すれ ば よい こと が わか る . これ を 式 (427) に 代入 し た も の が 
式 (4.22) で ある . 














4.4 方 程 式 /(z) = 0 を 変形 し た z = (z) で 解 を 求め る 反復 の 過程 . zo か ら 始 め て 
Zr, 2 …・ と 交点 eg に 向かっ て 収束 し て いく . 右 図 は ニュ ー ト ン ・ ラ フ ソ ン 法 に 対応 し て お 
り , 収 東 が 速い . 


























4.5 送 2 次 関数 法 























一 般 的 に , 曲線 を 近似 する に は , 1 次 式 よ り 2 次 式 の ほう が 良い . 挟み 撃ち 法 は , 
2 点 間 を 結ぶ 1 次 式 で 推定 値 を 決め て いる が , ここ で は 2 次 式 を 使う こと に する . す 
る と , 3 点 が 必要 で ある か ら , 2 分 法 の 中 間 点 も 使う こと に な る . この 場合 は 普通 の 
内 挿 と は 異な り , ッ = ニ 0 と な る z の 推定 値 ji, を 内 挿 で 求め る の で ある か ら , 逆 関 数 
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の 2 次 式 ヶ =z(9) を 使う こと に な る . そこ で , 解 を ある 程度 追い つめ て か ら で な い 
と , zi が 両端 の 値 2 と za。 の 外側 に な っ て し まう こと が ある の で , 内 側 に 収 ま 
る よう に な る 程度 まで は 2 分 法 な ど を 使う 必要 が ある . 図 4.5 は 2 分 法 な ど で 使 っ た 
関数 の 解 を , 逆 2 次 関数 法 で 求め て いく 過程 で ある . 最初 の 逆 2 次 関数 の グラ フ は ., 
zmax より 右側 に 飛び 出し て いる 部 分 も ある が , zu は 内 側 に 納まっ て いる の で , この 
結果 を 使う こと が で きる . 2 で すでに 解 を 求め る 関数 を 良く 近似 し て いる こと が 
わか る . 
逆 2 次 関数 法 に より , 解 を 1 個 だ け 探 すこ と の で きる プロ グラ ム (Gyaku_2jikansuu. 
java) の メソ ッ ド (gyaku_2jikansuu) と , その 説明 は 以下 の と お り で ある . 
























































回 


























Gyaku_2jikansuu.java の メソ ッ ド (gyaku_2jikansuu) : 


1 public doub1e gyaku_2]jikansuu(doub1e xmin, doub]e xmax, 
2 MyFunction f, doub1e eps) t 

3 double xint , xm1d, nt ym1d: 

4 GeDS ニ = @eDS*(xmax-Xmin) : 

5 doub1e ymin= f.function(xmin) : 

6 doub1e ymax= f.function(xmax) : 

IM if (ymin*ymax > 0) 

8 System.out.print1n("ERROR: ymin*ymax > 0!"): 

9 return 0.0: 


10 由 

ii xm1d= (xmax+xmin) /2: 

12 ym1d= f.function(xm1d) : 

IS for (int =0O: 1<30: ュ ++) て 

14 Xx1nt= xm1n*ym1d*ymax/ (ym1n-ymid) / (ymin-ymax) 
15 + xmid*ymax*ymin/ (ym1d-ymax) / (ym1d-ymin) 
16 + xmax*Yym1n*ym1d/ (ymax-ymin) / (ymax-ym1d) : 
17 yint= f .funct1on(xint) : 

18 if (xint > xmid) { 

19 Xxm1n= xm1d: 

20 ym1n= ym1d: 

21 } el1se { 








図 4.5 逆 2 次 関数 法 で 解 を 求め て いく 過程 . 実線 は 解 を 求め る 関数 , 破線 は 最初 の 逆 2 次 関 
数 一点 鎖線 は 2 度目 の 逆 2 次 関数 で ある . 収束 は 非常 に 速く , 6 回 で 14 桁 精度 が ある 解 が 
求め られ る . 


























4.6 


方 程 式 の 解法 


22 xmax ニ = xxm1d: 
23 ymax= Ym1d: 
24 が # 

25 Xxm1d= xx1nt: 
26 ym1d= yintj 


27 if (Math.abs(xmax-xmin) く eps) break: 


28 由 
29 return Xm1d: 
30 # 


1. L1, 2 て 30: メソ ッ ド gyaku_2jikansuu の 定義 で ある . 引数 の xmin、xmax は 
解 を 探す 範囲 の 下限 と 上 限 、f は イン タフ ェ ー ス MyFunction クラ ス の イン ス 
タン ス で あり , 解 を 求め る 関数 が 定義 され て いる . eps は 解 の 精度 の 半 値 で 
(xmax-xmin) に 対す る 相対 値 で ある . 戻り 値 は 解 で ある . 














2. L4: (xmax-xmin) に 対す る 相対 値 で 与え られ た 関 値 eps の 値 を , 相対 値 か ら 絶 


対 値 に する . 

















3. L5, 6: ymin, ymax に 初期 値 を 代入 する . 
4. L7 て 10: ymin*ymax>0 で あっ た ら , 解 が な いか も し れ な いか ら , 警告 を 出し て 


終了 する . 























の の の 


を xmin, ymin に 代入 する . 


9. L22, 23: xint>xmid で な か っ た ら , 解 は xmin 側 に た ある か ら , xmid, ymid の 値 


を xmax, ymax に 代入 する . 


L11, 12: xmid, ymid に 最初 の 予測 値 を 代入 する . 
L13 て 28: 逆 2 次 関数 法 を 最大 30 回 繰り 返す . 
L14 て 17: 逆 2 次 関数 法 で 次 の 予測 値 を xint, yint に 代入 する . 

L18 て 20: xint>xmid で あっ た ら , 解 は xmax 側 に た ある か ら , xmid, ymid の 値 


10. L25, 26: xmid, ymid に xint, yint を 代入 する . 
11. L27: 解 が 存在 する 範囲 xmax-xmin が eps 以下 に な っ た ら ル ー プ を 抜け 出す . 






































12. L29: 解 と し て xmid を 戻す . 


多数 の 解 が ある 場合 の 汎用 プロ グラ ム 























解 を 探す 関数 の 性 質 が わか っ て いる 場合 に は , これ まで に 述べ た 方 法 を うま く 使 っ 


て 解 を 求め る こと が で きる で あろ う . し か し , 関数 に よっ て は , いろ いろ な 条件 に 


よっ て 解 の 個数 が 変化 し た り , 発散 する 特異 点 が 


デベ ハ の い 








存在 する 場合 も ある で あろ う . そ 


の よう な 場合 に は , 片方 の 端 か ら 探し 始め , 特異 点 を 避け な が ら 解 を 探索 する プロ グ 
ラム が ある と 便利 で ある . 関数 を 7(z) と し , 解 を 探索 する 範囲 を 1z。。, zu。」 と する . 
まず , (zo。) か ら 始 め , 刻み を Az と し て 順次 ,、 点 z,( = zo 十 2 x Az) で の 了 げ (z) 
の 値 を 求め て いく . も し , 7(z,_1)7(Z。) <0 と な っ た ら , zi- ュ と pj, の 間 で 2 分 法 や 逆 
も し (esa)| が げ (Z に 1) と ey)| 
より 大 きか っ た ら , zz_-i と z: は 発散 する 特異 点 を 挟ん で いる 可能 性 が ある . そこ で , 











2 次 関数 法 な ど を 使っ て , 解 を 追い つめ て いく . 











2 分 法 と 同様 に 7(zia) を 次 々 と 求め 、 適 当 な 区 











数 (6 て 10 
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) に わた り (ia の 増 
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2 
げ ⑦) 
げ (Zz』1) を 求め て 7(z) と 比較 し て 先 に 進む . も し , (zz_1)7(z/) > 0 で あっ て も , 微 
係数 が (を りー Z) >0, か つ ナ (z- ュ リー 5) < 0 で あっ た ら , zi_。 と z, の 間 
7(z) げ (zz_ ュ ) 

に 解 が 2 個 あ る か も し れ な いか ら , その 間 を より 細か な 刻み , 例え ば Az/5 を 指定 し 
て 再帰 呼び 出し を 行う . この 方 法 で は , 3 重根 は 単 根 と の 区 別 が 付け られ な い の で 
さら な る 改良 が 望ま れる . 

較 4.6 は 関数 


7 サーク ター ジー 2.4 (4.29) 





大 が 続い た ら , 関数 の 逆数 の ゼロ 点 を 見 つけ て , それ を 特異 点 と する . その 後 , 


















































と , プロ グラ ム FindZero で 求め た 解 を プロ ッ ト し た 図 で ある . 特異 点 1.1 と 互い に 近 
接し た 2 根 2.3816 と 2.4527 も と ら え られ て いる . 

プロ グラ ム (FindZero.java) の メソ ッ ド (fndZero) の 引数 と 戻り 値 は 以下 の と お り で 
ある . 





FindZero.java の メソ ッ ド (fndZero) の 引数 と 戻り 値 : 


1 pub1ic double[] findZero(doub1e xmin, double xmax, double dx, 
| MyFunction f, doub1e eps) t 


メソ ッ ド fndZero の 定義 で ある . 

xmin は 解 を 探し 始め る x の 最小 値 (始点 ) で ある . 

xmax は 解 を 探す x の 最大 値 (終点 ) で ある . 

dx は 解 を 探す と き の x の 刻み で ある . 

f は イン タフ ェ ー ス MyFunction の イン スタ ンス で あり , 解 を 求め る 関数 が 定義 
され て いる . 

6. eps は 解 の 精度 の 半 値 で ある . 

7. 戻り 値 は 解 の 配列 で あり , 要素 の 数 は 求め られ た 解 の 数 で ある . 


ek 記 、9 SS 呈 











図 4.6 関数 の グラ フ (点線 ) と プロ グラ ム EindZero で 求め た 複数 の 解 (。) . 特異 点 や 極め て 
近接 する 解 が ある よう に 、 関数 は ぜ エ リ 9 タ ー ク ター ば ー >4』 と する 5 個 の 解 が あ 
り , それ ら は 1.076, 0.1014, 2.3816, 2.4527, 4.1404 で ある . 縦 の 点線 は 特異 点 1.1 で ある . 
(Z04_.06_FindZero.java) 
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プロ グラ ム (FindZero.java) の メソ ッ ド (fndZero) を 使う と き の 注 意 事 項 は 以下 の と 
お り で ある . 


(CC O の の の 喉 の OND は ロ は 


は ロ 
テテ の 


演 壮 問題 





1mport mypackage .FindZero : 
1mport mypackage . MYFunct1on : 


中 略 


FindZero fz= nevw FindZero() : 
Function f= nev Function() : 


中 略 





class Function implements MyFunctiont 


pub1ic doub1e function(doubl1e x) て 
return こと に 式 f(x) を 書く : 


+ 
+ 


1. L1.2: クラ ス FindZero と MyFunction を イン ポー ト す る . ここ で は , 直下 の 


ディ レク トリ [mypackage] に ある こと と し て いる . 











2. L4.5: メソ ッ ド fndZero を 使う メイ ン メ ソ ッ ド な どの 中 で , 両 ク ラス の イン ス 
タン ス | 到 ] と [| を 作る . その 後 メ ソ ッ ド findZero や fanction を 使う . 
L7 て 11: イン タフ ェ ー ス MyFunction を 実装 する クラ ス [Function | を 定義 する . 


L9: 実際 の 関数 の 式 を 定義 する . 





9。 
4. L8C て 10: メソ ッ ド fanction を オー バー ライ ド す る . 
5 
6 


[ ] 内 の 名 前 は , 固 











定 さ れ て お ら ず , 人 





上 意 で ある . 











4.1 














ニュ ー ト ン ・ ラ フ ソ ン 法 に よる 解法 の プロ グラ ム NewtonRaphsonTest.java を 
修正 し て , 関数 2 十 3z2ー2zー1=0 の 解 を 求め な さい . 





4.2 





























解 を [0, 4] の 範囲 で 求め な さい . 





父 ・ 


合 - ・ 


答 : -0.3247 





複数 解 の 解法 汎用 プロ グラ ム の Z04_06_FindZero.java を 使っ て , sinz2 = ニ 0 の 


0, 1.772, 2.507, 3.070, 3.545、 3.963 
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数 値 積分 法 





り .1 





ある 関数 の 積分 が 解析 的 に わか っ て いる 場合 に は , その 関数 の 定 積分 は 容易 に 求め 
られ る . し か し , 積分 が 解析 的 に わか っ て いな い 場 合 に は , 数 値 計算 で 近似 デ 的 に 求め 
る こと に な る . その 数 値 積分 の 基本 と な る 方 法 は , 定 積分 が わか っ て いる 関数 P(?) 
を 使っ て 被 積 分 関数 7(z) を 近似 し . その 定 積 分 の 値 を 近似 値 と する 方 法 で ある . そ 
の 近似 関数 は 多く の 場合 多項式 で ある . 




















妨 形 近似 





関数 7(z) を ある 区 間 [z, z」] で 積分 し た いと き , 関数 値 が ある 1 点 zy。 で し か わか 

ら な い 場 合 に は , 積分 値 を (z」 - zo)7(z。) で 近似 し て 我慢 せ ざ る を 得 な い . も し , あ 
る 区 間 [zo を yp 等 分 し た 各区 間 の 中 点 で 7(z) の 値 を 知る こと が で きれ ば , 積分 
値 を 











7 一 1 
7 十 多 。 
4 2 )、 カニ アァ ュ ーZ の 0 (5.1) 


Il 








で 近似 する こと が で きる . 等 間隔 で な い 場 合 に は 、 それ ぞ れ の 幅 を 
と し て 


上 み 訪 碗 2+ ュ ーー アツ 2 


7 一 1 
> / ( 補 ) > が 三 ダ タキ ュー: (5.2) 


2 一 0 














と な る . これ を 千 形 近似 と いう . 採用 する 関数 値 を , 中 点 で は な く 各 間隔 の 左端 の 点 
ある い は 右端 の 点 で の 値 と する こと も 考え られ る . 
図 5.1 は 積分 値 


9 





























/ e+ (5.3) 
0 














を 4 分割 の 逢 形 近似 で 求め る 例 で ある . 左 図 か ら そ れ ぞ れ 左 端 , 中 央 , 右端 の 関数 値 
を 使う 場合 で あり , 一 番 右 の 図 は 次 節 で 扱う 台形 近似 の 場合 で ある . 積分 の 真 値 は 
1.0 で ある が , 左 図 か ら そ れ ぞ れ 0.730, 0.932, 1.168, 0.949 で ある . 精度 は 関数 型 に 
よっ て まち まち で あろ う が , 一 般 的 に 中 央 の 点 を 使う 場合 や 台形 近似 が 良い で あろ う . 
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2 2 2 2 
1 1 1 北 。 ( 
0 0 0 0 軒 | 

0 1 |O 1 |O 1 1 

















図 5.1 逢 形 近似 定 和 分 は / (> 十 1)"dz で あり , 左 図 か ら 左端 , 中 央 , 右端 の 関数 値 を 


















































の , 知 形 で ある . 








使っ た 場合 で ある . 一 番 右 の 図 の 実線 は 台形 近似 で の 




















図 で あり , 点線 は 公式 を 変形 し た と き 








用 ニュ ー ト ン ・ コ ー ツ 型 積分 














法 で ある . 刻み 幅 を ヵ = 


5.2.1 台形 近似 


最も 単純 な 2 点 ( ゅ =1) の 場合 

















区 間 [zo,z。| を 等 分 し た ヵ 十 1 個 の 点 に お いて 関数 値 7(z,。) が 使え る 場 





合 の 近似 


(z。ーzo)/p と 置く と , 分 点 は z,= 十 zo (0<? く ) で あ 
り , すべ て の 分 点 z。 に お ける げ (z,) の 値 を 使う こと に する . 








に は , 2 点 間 を 1 次 式 














(o+ ナ (o) 
時 6 (5.4) 
時 ーー 0 
ー パ %o)- + リー 前 
で 近似 する . この 場合 , 積分 され る 領域 の 形 は 台形 と な っ て いる ! の で 台形 近似 と いわ 























れる 、 定本 分 は 式 (54) を 筑 分 し て 求め る こと が で きる が . 台形 の 面積 の 公式 を 使う と 




















je 7) + DJ42 = 37 の 37(eD( 














で ある . この 台形 で は ヵ が 高き さと な っ て いる 


域 の 両端 の 高 さ (zo) と 
も の で ある と も いえ る . 


よい が , 1/2 ずつ の 重み が 順当 で あろ う . 分 点 が 妨 十 1 点 あ り 間 隔 





げ (z1) に , 重み 1/2 

















で ある 場合 に 台形 公式 を 繰り 返し 適用 する 


だ が /(9dz = ん 1 の te em 


1 の 一 番 右 の 図 は 台形 公式 で の 積分 の 様 











と な る . この 式 は 台形 公式 と いわ れる . 図 5. 























(5.5) 


最後 の 式 は 、 見 方 を 変え る と 幅 ヵ の 領 


ずつ を 掛け 合わ せ て 加え , 幅 ヵ を 掛け た 
この 重み は , 合計 が 1 で あれ ば , どの よう な 組み 合わ せ で も 








と , 積分 公式 は 












































子 で ある . 実線 は 元 の 台 


少 公式 その まま の 台 








1 台形 と いっ て も , 台 は 横 に 寝 か さ れ て いる 











角 の 寄せ 集め で ある が , 点線 は 台 








山 は すべ て 等 し く ヵ 


(5.6) 


公式 
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を 繰り 返し 適用 し た と き の 公 式 で あり , 面 端 の デー タ 点 に お ける 重み 幅 が > で *、 途 中 
の 委 四 0 の 8 及 の 和幸 G6SRIEOGE0Se ら ま 守 PD 



































次 は 等 間隔 の 3 点 (zo, zi, zo) を 使う 2 次 式 の 場合 で ある . 2 次 式 は 


72(z) = gーz1)7 十 0( ァ 一 z1) 十 c (5.7) 





と する こと が で きる . 2 一 ダ タデ ター70 三 ん を 使う に 


げ (zo) = q が だ 一 太 十 c 
72?1) = c (5.8) 
げ (Z2) = gg が 2 十 太 十 c 





で ある . これ か ら g= (eo) - リ 7 ぁ ニ 間 還 旨 c ニ (zi) が 決ま 


る . gc を 式 (5.7) に 代入 し て 整理 する と , 補間 法 の 式 (3.5) 


2 2 
ce-(7m 則 に (5.9) 


























沈 


7 王 0 (? デ 9 








で ある . 他方 .g. 5 c を 式 (5.7) に 代入 し , >z」 が 0 に な る まで 関数 を 平行 移動 する と, 
定 積 分 を より 容易 に 求め ' る こと が で き て , それ は 


た ィ (dg ニカ 1 7 37(m ミ 37(e)) (510) 


と な る . 台形 近似 の 式 (5.5) と 比べ て , この 場合 は 中 点 z」 で の 重み が より 大 きく な っ 
て いる . この 近似 は 2 次 式 を 使っ て 導い て いる か ら , 被 積分 関数 が 2 次 式 ま で は 正確 
で あり , 誤差 が お 生じ な い . 

分 点 が 27x 十 1 点 あ り , 間隔 が ヵ で ある 場合 に この 公式 を 繰り 返し 適用 する と , 積分 


公式 は 
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7 = Le + es) 45) 70 +2 5 el 517) 


と な る . この 公式 は シン プ ソ ン の 公式 と いわ れる 
プロ グラ ム (integral_Simpson.java) の メソ ッ ド (integral_Simpson) と , その 説明 は 以 
下 の と お り で ある . 


integral_Simpson.java の メソ ッ ド (integral_Simpson) : 


1 pub1ic doub1e integra1_Simpson(int n, doub1e xmin, doub]e xmax, 
ウ MyFunction f) て 

8 if (n==0) return 0.0: 

4 doub]1e 

doub]e h= (xmax-xmin)/n: 


doub1e sum= f.function(xmin) : 
Or 舞 (int 還 15 還 <mli 四 三 2) 中 1 


メニ Xm1n+1* ネ h: 
Sum += 4.0*Ff .function(x)+2*F . 下 unction(x+h) : 


10 有 
11 Sum -= f.function(xmaxx) : 
12 return Sum*h/3.0: 





台形 公式 , 


関数 で ある 


図 52 の 左右 の 図 の 実線 は 節分 


L1. 2 て 13: メソ ッ ド jintegral_Simpson の 定義 で ある . 引数 n は 座標 の 分 割 数 
で あり , 偶数 で な けれ ば な ら な い . xmin は 積分 領域 の 最小 値 、xmax は 積分 人 
域 の 最大 値 で ある . f は イン タフ ェ ー ス MyFunction クラ ス の イン スタ ンス で あ 
り , 解 を 求め る 関数 が 定義 きれ て いる . 戻り 値 は 積分 値 で ある . 

L5: 変数 h に z 座標 の 分 割 の 間隔 を 代入 する . 

L6: 積分 値 を 足し 込ん で いく 変数 に , 初期 値 と し て 積分 領域 の 最小 値 で の 関数 値 
を 代入 する . 
L7 て 10: 2 刻み を 1 単位 と し て 積分 を 処理 する の で , ルー プ の 数 は n/2 と な る . 
L8: 変数 x に 次 の 2 刻み の 小さ い ほ う の 値 を 代入 する . 

L9: x の 値 で の 関数 値 は 4 倍 し , 次 の 刻み x+h で の 関数 値 は 2 倍 し た 値 を sum 
に 足し 込む 

L11: ルー プ が 終わ る と , 最後 の x の 値 . xmax に お ける 関数 値 は 2 倍 が 足し 込 
まれ て いる か ら , ここ で , 1 倍 分 を 引き 去っ て お く 

L12: sum に 間隔 h を 掛け 、 3 で 割っ て 積分 値 と し て 返す . 


















































ーー の 第 本 分 関数 で ある 、 図 の 破線 は 


2 
0 277 























右 図 の 点線 は シン プ ソ ン の 公式 を 使っ て お り . と も に ヵ = ニ 4 の と き の 近 似 








次 に , ヵ の 数 を 増やす と , どの よう に 近似 が 良く な っ て いく か を 調べ る . 図 5.3 は 





27 ・ 
 S1m 
直 分 / 一 
0 2 旭 








dz =1 の 台形 公式 (x) と シン プ ソ ン の 公式 (o ) に よる 近似 値 が , 分 


割 数 ヵ の 増加 と と も に , どの よう に 収束 し て いく か を 調べ た も の で ある . 





図 5.2 は 





2 三 4 の 場合 で ある か ら 図 5.3 の ヵ = ニ 4 に 対応 し て いる . 表 5.1 に は 近似 





計算 値 を 志 し て ある . ヵ = 2 で は 両方 と も 積分 値 が ゼロ に な っ て いる が , これ は 関数 





値 が 両端 と 
ほう が 優れ 


表 5.1 に い 
形 公 式 で の 








中 点 で ゼロ に な っ て いる か ら で あ る . 図 5.2 か ら も , シン プ ソ ン の 公式 の 
て お り , 台形 公式 で は 収束 が 遅い こと が わか る . 数 値 的 に 理解 する た め に , 
くつ か の 分 割 数 ヵ に つい て の 近似 値 を 載せ て ある . ヵ =20 で の 精度 は , 台 
計算 で は 3 杵 し か な い が , シン プ ソ ン の 公式 に よる と 5 桁 は ある . そこ で 














第 6 章 で 述べ る ルン ゲ ・ ク ッ タ 法 な どの 微分 方 程 式 を , 等 間隔 の 分 点 で 解い た 場合 な 
ど に , 解 の 関数 を 規格 化す る 積分 な ど で は ,. シン プ ソ ン の 公式 が よく 使わ れ て いる 
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5.2 関数 1 台形 近 公 と シン プ ソ ン の 近似 . 左 図 の 破線 は 台形 公式 、 有 図 の 点 


線 は シン プ ソ ン の 公式 を 使っ て お り , と も に ヵ =4 の 近似 関数 で ある 





1 0 0+m+ の m+ の + の +@+@ 二 @ 
二 


























5.3 台形 公式 と シン プ ソ ン の 公式 に よる 近似 値 の 収 東 性 . + 印 は 台形 公式 , o 印 は シン プ 








2 ァ 7 ・ 
ソン の 公式 で 求め た 値 で ある . 検分 は / 上 ーdz で あり 、 真 値 は 1 で ある . 横 和 は 分 割 
0 





数 で ある . シン プ ソ ン の 公式 で は 1 区 間 で 2 分 点 を 使う の で , 分 割 数 ヵ が 偶数 の と きのみ 
計算 きれ て いる . 

















真 値 


) 





表 5.1 台形 公式 し シン プ ソ ン の 公式 で 求め た 積分 値 . 節分 は / ーー3qz で あり 
は 1 で ある . ヵ は 分 割 数 で ある . 























? | 台形 公式 | シン プ ソ ン の 公式 
2 | 0.0 0.0 

4 | 0.7853 1.0471 

6 | 0.9068 1.0076 

20 | 0.9917 1.00005 




















次 の 補間 多項式 は ,. ラグ ラン ジュ の 補間 公式 (3.6) に よる と 


sm ][ (5.12) 


? 王 0 7 一 0 (? デ 9 


で ある . ここ で , 関数 II(z) を 














II(z) = le ー の の :) (5.13) 
? 王 0 
義 す る . これ を 使う と 式 (5.12) は 
On 8 (5.14) 


2 王 0 























数 値 積分 法 
生 どど 只 千 。 
IT(z) = > - る) 
本 (5.15) 
IT(z:) = [Ge -) 
7 デ : 
を 使っ て いる . 次 に ヶ =zo 十 奴 (0> ヵ >) と 置く と ァ ーz, ニカ (6 一 2 で ある か ら , 
HI(z) = がけ な は 21) 2 一 %) (5.16) 
で あり , 
TP(z:) ニー が 6 一 1)…2・1・(-1)・(-2)… 一 
(5.17) 
が (1)7ー22(ー9! 
と な る . これ を 使う と 式 (5.14) は 
= と 7ey 1 0 ・《ー の ) 直 軸 
0 (2ー9 一 ? 
と な る . そこ で , 定 積分 は 
6 ー MT 一 1)… (一 の ) 
放 ,(Z)dz ニ eo 吉 IO 4 た 和 d 
(5.19) 
三 (710 
? 王 0 
と な る . 最後 の 式 で 重み 
(-1)77 7/ 季 2 一 1)…( 一 の) 
= こん #ー? 還 0520 
を 使っ て いる . ヵ =1, 2, 3 の 場合 の 。 を 表 5.2 に 示す . 














ある 関数 を 一 定 の 範囲 
良く な る の は 当然 で も る が , 























[zo,z。 | で 積分 する な ら , 分 点 の 数 を 多 
全体 の 分 点数 ヵ と 間隔 ヵ を 一 定 に し た まま で 積分 する の 


くす る ほう が 精度 が 


な ら ば , 多数 の 分 点 を 使う 高 次 の 多項式 を 使っ て 計算 する より , 式 (5.11) の よう に 2 





次 式 の シン プ ソ ン の 近似 を 繰り 返し 使う ほう が , 

















簡 





で ある し 精度 も 良い よう で ある . 














表 5.2 ニュ ー ト ン ・ コ ー ツ 型 積分 公式 で 使わ れる 重み . 
72 の 。 (2 三 0,…・, 7) 
1 1/2, 1/2 台形 公式 
2 1/3, 4/3, 1/3 シン プ ソ ン の 公式 
3 | 3/8, 9/8, 9/8, 3/8 
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5.3 ガウ ス 下 オ 積 分 


81 














先 の ニュ ー ト ン ・ コ ー ツ 型 積分 で は , 前 も っ て 決め て ある ヵ 丁 1 個 の 分 点 を 使 

















っ て 7 の 





次 式 で 近似 し た が , ヵ 個 の 分 点 の 位置 座標 z。 と 分 点 で の 重み ゅ 。 の ヵ 個 を うま く 使 え 
ば , 自由 度 は 27 に な る の で , 2 ヵ - 1 次 式 で 近似 する こと が で きる . そこ で , 前 も っ て 
分 点 で の デー タ が 与え られ て いる の で は な く 《, 任意 の 点 に お いて 関数 値 を 計算 する こ 
































と が で きる 場合 に は , この 方 法 が 有利 で ある . 区 間 [|z.5 ヵ ] に お いて , 重み 関数 2 





付け た 関数 /(z) の 定 積分 を 検討 する . ある ヵ に つい て , 積分 公式 


ゎ 2 
/ e(97( の dz = う 7(e) 


(z) を 


(5.21) 


が , (2 一 1) 次 の 多項式 まで 正確 に 成り 立つ よう に , デー タ 点 (ここ で は 分 点 と いう 
より ふさ わし いで あろ う ) z, と 重み w, を 決定 すれ ば よい . ニュ ー ト ン ・ コ ー ツ 型 の 
公式 で は 両端 の 点 を 使っ て いる か ら , 和 は ?= ニ 0 か ら で あ っ た が , 式 (5.21) 以下 で は 
2 王 1 か ら で あ る . げ 7) を (2 一 1) 次 の 多項式 で も る と する . 最高 次 の 項 の 係数 が c。 














で , げ ( 々 ) を 割っ た 商 と 剰余 を それ ぞ れ 0。_i(?), fr。_ ュ (z) と する と, 
げ () 3 5。() の 。_1(Z) 十 朋 。 ュ ( ダ ) 


と な り , 6,。_i(z) と 兄 。- ュ (z) は 高々 (ーー1) 次 の 多項式 で ある . 一 方 , 9。(z。) = 


ある か ら , 兄 (cy) = 7(x:) と な る こと を 考慮 する と , 式 (5.14) と 類似 の 式 
7 げ (z) 
胡 。 ュ 1(Z 三 5x( 0 202 (z = 957 (z。) 


と な る こと が わか る . これ ら を 式 (5.21) に 使う と , 


/ の - / 
OCNO2EOPE0 |- 50 上 
回 2? ニ 1 0 人 ん 





と な る . ここ で , 任意 の げ ( ヶ ) に 対し て , すなわち , 任意 の の,_i(z) に 対し て 








ぁ 
/ の (z)5。(Z)O。_i(z)dz テ 0 














- 後 で 出 て くる チェ ビシ ェ フ の 筑 分 公式 で は , 重み 関数 は w(z) = 





1 as 
コー で ある . 被 積分 関数 カ カー 





(5.22) 


(5.23) 


0 で 


(5.24) 


(5.25) 


(5.26) 


の 形 に 


変数 変換 を する こと が で きる 部 分 を 含ん で いる 場合 に . その 関数 を w(z)7(z) と し て , 積分 公式 を げ (z) に 当て は め 
る こと に な る . 一 般 的 に , 積分 範囲 が 有限 で あり , 被 積分 関数 の 発散 点 を 含ま な けれ ば , 重み 関数 は 必要 で な く , 





の (z) 三 1 で ある . 


と な る よう に すれ ば , 式 (5.25) か ら 重 み , は 











ー 1 の (Z)5。() 
077 (z) 有 語っ dz (5.27) 
ーー1 
と し て 決ま る . ( ゅ ー1) 次 の 任意 の 多項式 O。_」(>) = ) giz' に 対し て 式 (5.26) が 成 
? 王 0 
り 立 つた め に は , 
ら 
/ sn の fdr 0 (を =0,1…」 タ テー1) (5.28) 


Im 


が 成り 立つ よう に 5,(z) を 選べ ば よい . 区 間 [2.6| に お いて , 重み 関数 を w(z) と 

し て 式 (5.28) が 成り 立つ よう な 直交 多項式 系 wo(), ゆ (*), … , W。(), … は 特殊 関 

数 論 で すでに わか っ て いる . そこ で , 9,。(z) = の w。(z) と 置け る こと , お よび 58,(Z) = 

em (ex) で ある こと か ら , デー タ 点 {z1,… , ss) は (2) = 0 の 実数 解 で ある 
? 王 1 


こと に な る . 





























5.3.1 区 間 が [一 1,1] で 重み 関数 が to() 三 1 の 場合 





区 間 が [| -1, 1] で 重み 関数 が w(z) = 1 の 場合 に は ,. ガウ ス ・ ル ジャ ンド ル の 公式 に 
な る . この 場合 使わ れる 直交 多項式 系 は ルジャンドル 多項式 で あり , その ヵ 次 の 多 項 
式 は 
































Ra の = () 1)" (5.29) 
で ある . デー タ 点 は この ヵ 次 多項式 の ヵ 個 の 実数 解 で あり , 重み : は 式 (5.27) か ら 

ーー 2 (5.30) 
で あり , 定 積分 は 処理 が 可能 で , 

w 三 21 一 %9 (5.31) 


( 寺 1)2 {Pr(z) だ 
と な る . この 積分 公式 は ガウ ス ・ ル ジャ ンド ル の 積分 公式 と いわ れる . 


口 [-1.1| で ヵ =1 の 場合 
万 ((z) = ニ ァ だから, zi ニ 0。 ゅ 」 ニ 2 で ある . 2%ー1= ニ 1 だ か ら , 1 次 式 まで 


沖 
は 癌 差 が 入ら な い . 図 54 の 左 図 は 1 次 式 の 征 分 / ( テ +1) dz で ある 
= 
ロロ [|-1.1| で ヵ ー2 の 場合 























用) = (32 1) だ か ら , (= 是 ゆー1), (gp = 是 wp ー1) で あ 
る . 2 ヵ -ー1=3 だ か ら , 3 次 式 ま で は 誤差 が 入ら な い . 図 5.4 の 右 図 は 3 次 式 
1 3 
の 筐 分 / da。 で ある . 
= 
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図 5.4 ガウ ス ・ ル ジャ ンド ル の 積分 ヵ = 1.2 の 例 . 左 図 は ヵ = 1 で デー タ 点 は 0.0, 重み は 
2.0, 被 積 分 関数 は 1 次 式 0.5z1 (実線 ) で ある . 近似 積分 値 は wo げ (zo) = 2.0 x 1.0 = 2.0 で 誤 


差 は な い . 有 図 は ゅ ーッ で デー タ 点 は (一) 重み は (1.0. 1.0) で あり , 被 積 分 関 



































V3.0 V3.0/ 
ム 。」1)3 
人 二 0EMAJMM 
? 王 0 


- 三 1.0 で や は り 誤 差 は な い . 














左 図 の 1 次 式 の 場合 に は , 中 央 を デー タ 点 と し て , 重み を 2 と すれ ば 正しい 積分 値 
が 得 ら れる の は 自明 で ある が , 右 図 の 場合 に は , デー タ 点 は 2 点 し か 使わ ず , 重み は 
(1.0, 1.0) で ある の に , 任意 の 3 次 式 の 積分 に 誤差 が 入ら な いこ と は 一 見 不思議 な 気 が 
する . これ まで の 議論 で 志 さ れ て いる よう に , デー タ 点 の 値 を , 3 次 式 の 積分 まで で 












































9 
V 3.0 
表 5.3 は デー タ 点 が ( ヵ = 100 の ガウ ス ・ ル ジャ ンド ル 積 分 公式 の デー タ 値 で ある . 
10 


重み の 合計 時 に デー タ 点 は 中 央 が 粗く , 両端 で 密 に な っ て いる こ 











2 一 1 
と を 見 る た め に , 図 5.5 に は 、 デー タ 点 の 位置 に 重み の 大 き さ を 破線 で 示し て いる 
また , 重み は 各 デ ー タ 点 が 受け 持つ 横 の 領域 の 幅 で ある と も いえ る か ら , その 幅 を 実 
線 で 示し て いる 





(の 
実際 の 筑 分 / 7(e)dz" で は 和 分 範囲 が [c.6] で ある か ら 。 ガ ウス ・ ル ジャ ンド ル 





目 
の 積分 公式 / /()dz に 当て は め る た め に , 変数 変換 
ー1 


表 5.3 (ニニ 10) の ガウ ス ・ ル ジャ ンド ル 積 分 公式 の デー タ 値 . ヵ が 偶数 で ある か ら , デー 
夕 点 の 絶対 値 が 同じ 正負 の 座標 値 こ つい て 重み は 同じ 値 と な る . 






































座標 値 み 


土 0.148874338981631211 | 0.295524224714752870 
土 0.433395394129247191 | 0.269266719309996355 
ト 0.679409568299024406 | 0.219086362515982044 
ト 0.865063366688984511 | 0.149451349150580593 
主 0.973906528517171720 | 0.066671344308688138 


Im 
Im 

















84 





5.5 ガウ ス ・ ル ジャ ンド ル 積 分 公式 ( ヵ = 10)0 の デー タ 値 . デー タ 点 の 位置 に 重み の 大 き 
さ が 破 線 で 示さ れ て いる . 実線 は 重み を 各 デ ー タ 点 が 受け 持つ 横 の 領域 の 幅 と 解釈 し た と 
き の そ の 幅 で ある . 合計 は 2 で ある . 





























の 三 の 十 
(5.32) 
dz ニ ーー の 
が 必要 で ある . これ を 使う と , 実際 の 積分 公式 は 
(5ーg の ) (5ーg) (< 十 の 
5 7 の )w (5.33) 


で ある . 
プロ グラ ム (Gauss_Legendre.java) の コン スト ラク タ と メソ ッ ド (gauss_Legendre) 等 
の 一 部 と ,. その 説明 は 以下 の と お り で ある . 


Gauss_Legendre.java の コン スト ラク タ (Gauss_Legendre) と 
メソ ッ ド (gauss_Legendre) 等 の 一 部 : 


1 pub1ic class Gauss_Legendre { 


2 private doub1e[] s,: 

3 private nt m: 

4 public Gauss_Legendre(int m) { 

5 中略 

6 fina] doub1e s10[] = { 0.148874338981631211 , 
7 0 .433395394129247191 , 0 .679409568299024406, 
8 0.865063366688984511, 0.973906528517171720}: 
9) fina] double w10[] = { 0.295524224714752870 , 
10 0 .269266719309996355, 0 .219086362515982044 , 
1 0 .149451349150580593, 0 .0666713443086881376}: 
12 中 略 

IS this .m= m: 

14 if (m==3) て 

15 8 ニニ 8S3: w= W3: 

16 } e1se if (m==10) { 

17 8= 8S10: w= w10: 

18 中略 

19 + 

0 

21 

22 pub1ic doub1e gauss_Legendre(doub1e xmin, doubl1e xmax, MyFunction f) て 


ト う 
のり 


doub1e xx: 


1nt ]: 
double 
double 
double 


Sum = 0.0: 
a= (xmax-xmin)/2.0: 
b= a+xm1n: 


if (m/2*2 == m) 
1nt mm= m/2: 
for (int i=(mm-1) : 1i>=0: iー-) て 


2ー| 


ーa*S8 [1] +b: 


Sum += [1i] * 下 .function(x) : 


+ 


for (int i=0: 1i<mm: i++) て 


3 王 | 


a*S [1]+b: 


Sum += [1i] * 下 .function(X) : 


+ 
} e1se 
中 略 
+ 
return 


有 


MOT JRSI - 己 


の w 


10. 
1 
の 人 


13. 
14. 


15. 
16. 
17. 
18. 


{ 


a*SUm : 


L1 て 43: クラ ス Gauss_Legendre の 定義 で ある . 
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L2: コン スト ラク タ と メソ ッ ド で 共通 に 使う デー タ 


配列 sw の 宣言 を する . 


























L3: コン スト ラク タ と メソ ッ ド で 共通 に 使う デー タ 点 の 数 m の 宣言 を する . 
L4 て 20: コン スト ラク タ Gauss_Legendre の 定義 で ある . 引数 m は 使う デー タ 


点 の 数 . 
L6 て 11: 使う デー タ 点 の 数 が 10 点 の 場合 の デー タ 点 

















の z 座標 値 と 重み で ある . 











L13: 引数 m の 値 を この クラ ス で 共通 に 使う フィ ー ル ド m に 代入 する . 




















L17: m=10 の 場合 に . この クラ ス で 共通 に 使う デー 
L6, L9 か ら 始 まる デー タ 用 配列 の 参照 を 代入 する 









































夕 用 配列 s,、 w に . それ ぞ れ 








L20: コン スト ラク タ Gauss_Legendre の 定義 の 終了 . 

L22 て 42: メソ ッ ド gauss_Legendre の 定義 で ある . 引数 xmin は 積分 領域 の 最小 
値 , xmax は 積分 領域 の 最大 値 で ある . f は イン タフ ェ ー ス MyEFunction クラ ス 
の イン スタ ンス で , 解 を 求め る 関数 が 定義 され て いる . 戻り 値 は 積分 値 で ある . 














L25: 積分 値 を 足し 込ん で いく 変数 sum を ゼロ で 初 











期 化 する . 


L26, 27: z 座標 を 標準 座標 系 に 座標 変換 する 係数 を 決定 する . 























L28: デー タ 点 の 数 が 偶数 の 場合 と 奇数 の 場合 で 処 政 
する . 





ほ が 異な る の で , それ を 判定 


L29: 偶数 の 場合 の 処理 が 始ま る . 変数 mm に デー タ 点 の 数 の 半分 を 代入 する 








L30 て 33: x の 負 側 の 処理 を , 絶対 値 の 大 きい 左側 か 
える . 
L34 て 37: x の 正 側 の 処理 を , 














こさ 











小さ い ほ うか ら 始 め , 





ら 始 め , 積分 値 を sum に 加 


積分 値 を sum に 加え る . 


L41: sum に 座標 変換 の 係数 a を 掛け , 積分 値 と し て 返す . 


L42: メソ ッ ド gauss_Legendre の 定義 の 終了 . 
L43: クラ ス Gauss_Legendre の 定義 の 終了 . 





























5.3.2 区 間 が [1。1] で 重み 関 雪 が py) ーー の 場合 
重み 関数 が w() = ーーー の 場合 の 直交 多項式 系 は チェ ビシ ェ フ 多項式 で あり 。 
その ヵ 次 の 多項式 は 

7 (Z) ニ cos(7 cos る ) (5.34) 





で ある . <4 の 具体 的 な 式 は 次 の と お り で ある . 








70(z 計 。.」 
71(z) = ニ z 
75(z) ニ 2z2ー1 (5.35) 
75(z) ニテ 423ー3z 
7(z) ニ 8z4 一 8z2 十 1 
デー タ 点 ! 
Z, 三 COS 上 ーー (2 1 , 7) (5.36) 


な の で 単純 で ある . 重み ぃ , は ? に よら ず 一 定 で 


























5 二 : (5.37) 
7 
と な る の で , 表 に し て お く 必 要 は な い . そこ で 積分 公式 は 
1 42 2 
げ ( 々 ) 7 2 一 1 
/ 2 王 2 (w 5。 ?) (5.38) 
で ある . この 公式 は 補 本 分 半生 分 守 の 両端 # に お いて ーー ニュー の 
が 一 仙 と 
発散 を し て いる 場合 に 使う こと が で きる . 例え ば , 積分 
* dz 刀 
記 5.39 
/ (z2 一 2z 十 2)Vz(2ー) 2V2 いり 
が そう で ある . 図 5.6 は 被 積分 関数 ミ (実線 ) と 重み 関数 と し 
(z2ー2z 十 2)Vz(2 一 ) 
1 二 時 1 上 
人 




















分 開 数 自体 に は 両 背 * ニ < 6 に お いて 一 型 の 発 散 が ある けれ ども 、 そ の 発散 は 有 く 
積分 (面積 ) は 有限 値 で ある . また , 計算 で は , その 発散 を 重み 関数 と し て 分 離す る の 
で , プロ グラ ム に 与え る 関数 が 素直 な 関数 と な り , 収束 の 速い こと は 表 5.4 か ら も 理 
解 で きる . 

プロ グラ ム (Gauss_TchebychefH.java) の メソ ッ ド (gauss_-Tchebycheff) と ,。 その 説明 は 
以下 の と お り で ある . 


















































中 
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図 56 ガウ ス ・ チ ェ ビ シェ フ 積 分 公式 が 使わ れる 被 積 分 関数 . 被 積分 関数 その も の は 
1 1 

















で , 実線 で 示さ れ て いる . 線 は , 重み 関 を 分 離し て 
ーー カエ の な ラー 線 で 示 破線 数 ーー テー を 分 区 
は 二 1 - 

プロ グラ ム に 与え る 関数 ニュー テー) で ちる. 

















表 54 ガウ ス ・ チ ェ ビ シェ フ 積 分 の 使用 する デー タ 点 の 数 と 精度 . 積 分 は 











っ 
/ 較 で あり , 積分 値 は - 了 = で ある . 
o (z2ー2z 十 2) Ve(2 一 ) 2V2 
ウー ニク が 積分 値 カフカ ニク 積分 値 
真 値 2.221441469079183 5 2.222102120831805 
1 3.141592653589793 10 2.221441370870214 
2 2.094395102393195 19 2.221441469079196 
3 2.243994752564138 20 2.221441469079181 
4 2.217594814298677 21 2.221441469079183 











Gauss_Tchebycheff.java の メソ ッ ド (gauss_Tchebycheff) : 


1 public doub1e gauss_Tchebycheff(1nt m, doub1e xmin, doub]e xmax , 
2 MyFunction f) て 

3 double a, b,。 : 

4 double sum = 0.0: 

5 doub1e pi= Math.PT: 

6 doub]e w= Di/m: 

7 p1= pi/2/m: 

8 a= (xmax-xmin)/2.0: 

9 b= a+xm1in: 

10 for (int =O: 1<m: 1++) て 

11 メニ a*Math .Cos( (2* ュ +1 ) *p1 ) +b : 
Sum += て * 下 .function(x) : 

1 + 

14 return a* ネ SUm : 


05 。 


1. L1, 2 て 15: メソ ッ ド gauss_Tchebychef の 定義 で ある . 引数 の mm は デー タ 点 の 
数 、 xmin は 積分 領域 の 最小 値 , xmax は 積分 領域 の 最大 値 で ある . f は イン タ 
フェ ー ス MyEunction クラ ス の イン スタ ンス で あり , 解 を 求め る 関数 が 定義 さ 
れ て いる . 戻り 値 は 積分 値 で ある . 

2. L4: 積分 値 を 足し 込ん で いく 変数 sum を 初期 化す る . 

















通 
cm 
朝 























3. MG 8 
4. L10 て 13: デー タ 点 の 数 だ け 積 分 値 を sum に 足し 込ん で いく . 
5. L14: sum NO a を 掛け , 積分 値 と し て 返す . 




















で 


.3.3 区 間 が [0,oo) の 場合 
重み 関数 を w(z) = 


/ e “7(Z Eb 2。) 


が 使え る . この 場合 の 直交 多項式 系 は ラゲール 多項式 で ある . 表 5.5 は デー タ 点 の 数 
ヵ n 王 5 の ガウ ス ・ ラ ゲー ル 積 分 公式 の 座標 値 , 重み ぃ , と 重み 関数 exp(-z,) の 値 で 
ある . デー タ 点 z, は 0.26, 1.41, 3.59。 7.08, 12.64 と いう よう に 原点 か ら 離 れる に 従っ 
て 間隔 が どん どん 大 きく な っ て いる が , 重み x: は 小さ く な り 役 割 が 減少 する よう に 
見 える . し か し , 重み 関数 cxp(-z。) の 減少 の 仕方 と 比較 する と 減少 が 遅く . それ な り 
の 役割 が ある こと が わか る 


表 5.6 は デー タ 点 の 数 ヵ = 3.5, 10 の 場合 の . 分 / 4e~ テ 
0 


5.7 の 2 5 





e-* と する こと が で きれ ば , ガウ ス ・ ラ ゲー ル の 公式 


(5.40) 












































ょ Bin 





示す 表 
, 人 破線 は 重 


dz の 精度 を 





Sim 


























で ある . この 積分 の 真 値 は ィ で ある . 欧 

















Sin 





み 関 数 e-", 点線 は 計算 に 使う 関数 


Sim 


で ある . 











重み 関数 を 除い た 関数 





の けれ ども , 重み 関数 e-* が 掛 





表 5.5 デー タ 点 の 数 ( ヵ ー5) の ガウ ス ・ ラ ゲー ル 積 分 公式 の デー タ 点 の 座標 値 z,, 
と 重み 関数 exp(-z,) の 値 . 


Im 














座標 値 z: 





exp( 一 Z み ) 





表 5.6 ガウ ス ・ ラ ゲー ル の 積分 の 精 
の 数 で 。 上 か ら ヵ =3,5, 


2.635603197181409e-1 
1.41340305910651679 
3.596425771040722 
7.085810005858838 
1.264080084427578e1 





5.21755610582809e 一 1 
3.98666811083176e-1 
7.59424496817060e 一 2 
3.61175867992205e 一 3 
2.33699723857762e 一 5 


0.7683 
0.2433 
0.0274 
8.3689 セ ー4 
3.2372 セ ー6 

















10 で あり , 右 の 列 は 「 計 人 算 値 - 真 値 (r) 」 で ある . 
7 | 計算 値 - 真 値 
3 | 0.014472164 
5 | 0.000012664 


0.000000116 








6 4e で Pd。 で ある . 左 の 列 は デー タ 点 
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図 5.7 ガウ ス ・ ラ ゲー ル 積 分 公式 が 使わ れる 被 積分 関数 . 重み 関数 と 計算 に 使う 関数 . 実線 
は 被 積分 関数 e ペー, 破線 は 重み 関数 e", 点線 は 計算 に 使う 関数 ご ー で ある . =5 の 


場合 の デー タ 点 の 位置 が , > 軸 か ら 下 に 付け た バー で 示さ れ て いる . 

















か っ て いる か ら 早 〈 く 減衰 し て いる . 図 57 に よる と , ヵ =5 で も 被 積分 関数 の 関数 値 が 
ゼロ で は な いよ うに 見 える デー タ 点 は 2 点 し か な い が , 5 桁 の 有効 数 字 が ある . ちな 
み に 、 こ の 積分 の 一 般 型 は / で etan1 5 で ある . 

0 




































































実際 の 積分 / 7(cOdz' で は 栓 分 人 が [z, oo] で ある か ら , ガウ ス ・ ラ ゲー ル の 


分 公式 / 7(Gy)dz を 使う 場合 に は 、 や は 変換 
0 


の ニッ ァ ー@ 





(5.41) 
dz ニー dz 
が 必要 で ある . これ を 使う と, 実際 の 積分 公式 は 
/ 7e-ge (5.42) 


で ある . 

関数 が z の 無限 大 まで 定義 きれ て お り , e~? で 減衰 し て いる 場合 に は . ガウ ス ・ ラ 
ゲー ル の 公式 が 当て は まる こと に な る が , z の 有限 領域 で 関数 の 変化 が 激しい 場合 に 
は , その 領域 で は ガウ ス ・ ル ジャ ンド ル の 公式 を 繰り 返し 使い 、 変 化 が 少な く な っ た 
減衰 領域 で が ガウス ・ ラ ゲー ル の 公式 を 使う こと に な る . 

プロ グラ ム (Ganuss_Laguerre.java) の コン スト ラク タ (Gauss_Laguerre) と メソ ッ ド 
(gauss_Laguerre) の 一 部 .、 お よび その 説明 は 以下 の と お り で ある . 

















Gauss_Laguerre.java の コン スト ラク タ (Gauss_Laguerre) と 
メソ ッ ド (gauss_Laguerre) の 一 部 : 


1 pub1ic class Gauss_Laguerre { 
private double[] s,wi 
Private nt m: 
publ1ic Gauss_Laguerre(int m) て 
fina] doub1e s3[] = {4.1577455678348e-1 , 
2.294280360279, 6.2899450829375 }: 
fina] doub]e w3[] = {7.11093009929e-1 , 
2.7851773356924e-1 , 1 .0389256501586e-2 }: 


〈 〇 CO の 中 OO いい 


中 略 


10 this .m= m: 

11 if (m==3) て 

12 8 ニニ 8S3: w= W3: 

13 中略 

14 + 

抽 5 。 よ 

16 

17 pub1ic double gauss_Laguerre(doub]e xmin, MyFunction fF) { 
18 doub1e xx: 

19 double sum = 0.0: 

20 for (int =O: 1<mz: ュ ユ ++) て 
21 メニ = 8[i]+xmin: 


Sum += V[1i] * ff.function(x) : 


23 ゅ 
24 return Sum: 


5  # 


必 9 Q ビ 


L1 て 26: クラ ス Gauss_Laguerre の 定義 で ある . 
L2: コン スト ラク タ と メソ ッ ド で 共通 に 使う デー タ 用 配列 s, w の 宣言 で ある . 
L3: コン スト ラク タ と メソ ッ ド で 共通 に 使う デー タ 点 の 数 m の 宣言 で ある . 
L4 て 15: コン スト ラク タ Ganuss_Laguerre の 定義 で ある . 引数 mm は 使う デー タ 
点 の 数 で ある . 
L5 て 8: 使う デー タ 点 の 数 が 3 点 の 場合 の デー タ 点 の z 座標 値 と 重み で ある . 
L10: 引数 m の 値 を この ク AH フィ ー ル ド m に 代入 する . 
L12: m=3 の 場合 に . この クラ ス で 共通 に 使う デー タ 用 配列 s。 w に . それ ぞ れ 
L5, L7 か ら 始 まる デー タ 用 配列 の 参照 を 代入 する . 
L15: コン スト ラク タ Gauss_Laguerre の 定義 の 終了 . 
L17 て 25: メソ ッ ド gauss_Laguerre の 定義 で ある . xmin は 積分 領域 の 最小 値 ,f 
は イン タフ ェ ー ス MyEunction クラ ス の イン スタ ンス で あり , 解 を 求め る 関数 
定義 きれ て いる . 戻り 値 は 積分 値 で ある . 
L19: 積分 値 を 足し 込ん で いく 変数 snm を ゼロ 初期 化す る . 
L20 て 23: 積分 値 を sum に 加え る 
L24: sum を 積分 値 と し て 返す . 
L25: メソ ッ ド gauss_Laguerre の 定義 の 終了 . 
L26: クラ ス Gauss_Laguerre の 定義 の 終了 . 








































































































5.3.4 区 間 が (一 oo, oo) の 場合 





重み 関数 を (>) = e-" と する こと が で きれ ば , ガウ ス ・ エ ルミ ー ト の 公式 


7 


/ ー ダ デア (ggz き う oi7(zy) (5.43) 


を 使え る . 


数 ヵ ー ニ 10 の ガウ ス ・ エ ルミ ー ト 積分 公式 の 座標 値 ,, 重み w, と 





? 王 1 


この 場合 の 直交 多項式 系 は エル ミー ト 多 項 式 で ある . 表 5.7 は デー タ 点 の 
み 関数 exp(-z 



































| 








の 値 の 表 で ある . 


表 5.7 デー タ 点 の 数 ( ヵ = 10)0 の ガウ ス ・ エ ルミ ー ト の 積分 公式 の デー タ 点 の 座標 値 
み ww。、 お よび 重み 関数 exp (-z の 値 . 





座標 値 z: 

土 0.342901327223705 
土 1.036610829789514 
土 1.756683649299882 
土 2.532731674232790 
土 3.436159118837738 














Im 





記 み 

6.108626337353258e-1 
2.401386110823147e-1 
3.387439445548106e 一 2 
1.343645746781233eー3 
7.640432855232621e-6 
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Ii 











exp(??) 
0.88907 
0.34144 
0.45687 セ ー1 
0.16372 セ ー2 
0.74508Eー5 


表 5.8 ガウ ス ・ エ ルミ ー ト 積分 の 精度 被 積分 関数 は e-" cosz で ある . 左 の 列 は デー タ 点 
の 数 . 上 か ら ヵ =10, 15 で あり , 右 の 列 は 「 計 算 値 - 真 値 (re "や )」 で ある . 








ー1.99840 セ ー15 
4.44089 セ ー16 





図 5.8 ガウ ス ・ エ ルミ ー ト 積分 公式 が 信 
の 場合 は 対称 な の で 正 の 部 分 し か 示し て いな い . 実線 は 被 積分 








思 








ほ わ れる 被 積分 関数 、 重み 関数 と 計算 に 使う 関数 . こ 
関数 e-“ cos Z, 破線 は 重み 関 





数 e-"", 点線 は 計算 に 使う 関数 cosz で ある . ヵ = 10 の 場合 の デー タ 点 の 位置 が 、z 軸 か ら 


下 に 付け た バー で 示さ れ て いる . 


表 58 は デー タ 点 の 数 nー 10.15 の 場合 の 。 積分 / 


この 積分 の 真 値 は re-0.25 ニ 1.38.・… で ある . 





実際 の 積分 範囲 は (-oo,oo) で ある が , こ 





e-“" coszdz の 精度 で ある . 


oo 


Co 


の 場合 は 対称 な の で 図 5.8 に は 正 の 部 分 し 





か 示し て いな い . 図 の 実線 は 被 積 分 関数 e-*” cosz, 破線 は 重み 関数 e-“", 点線 は 計 
算 に 使う 関数 cosz で ある . ガウ ス ・ ラ ゲー ル の 場合 の 重み 関数 は e-* で あっ た が , ガ 
ウス ・ エ ルミ ー ト の 場合 は e-"" で ある の で 減衰 は より 速く 、 データ 点 z, も より 小さ 








い 値 に 収まっ て いる . 





プロ グラ ム (Gauss_Hermit.java) の コン スト ラク タ (Gauss_Hermit) と メソ ッ ド (gauss 
_Hermit) の 一 部 、 お よび その 説明 は 以下 の と お り で ある . 


Gauss_Hermit.java の コン スト ラク タ (Gauss_Hermit ) と 
メソ ッ ド (gauss_Hermit) の 一 部 : 


1 pub1ic cl1ass Gauss_Hermit て 


(OO CO JJ の 愉 の ゆい 


Cc GO N) ト ) ト ) hb) D hD) DD) h) D) | は ビュ ロニ ロロ ロロ ビビ ビニ は ロロ 
は の で ON の 〇 の の の いい は の oo ココ の の 避 忌 の いい は の 
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private double[] s,Y: 
private nt m: 
pub1ic Gauss_Hermit(int m) て 
fina1 doub1e s10[] = {13.429013272237046e-1 , 
1 .036610829789514, 1 .756683649299882, 
2 .532731674232790, 3.436159118837738 : 
fina1 doub1e w10[] = {6.108626337353258e-1 , 
2.401386110823147e-1, 3.387439445548106e-2, 
1 .343645746781233e-3, 7 .640432855232621e-6 : 
中 略 
this .m= m: 
1f (m==10) 
8= 8S10: w= w10: 
中 略 
肌 


pub1ic doub]e gauss_Herm1t(MyFunction Func) て 
doub1e x: 
doubl1e sum = 0.0: 
1f (m/2*2 == m) { 
ュ int mm= m/2: 
for (int 1=mm-1: 1>=0: ー-) 
x= -8[i] : 
Sum += w[1i] * Func.function(x) : 
+ 
for (int i=0: 1<mm: ++) 
x= gli]: 
Sum += w[1i] * Func.function(x) : 
+ 
中 略 
有 


return Sum: 


L1 て 36: クラ ス Gauss_Hermit の 定義 で ある 

L2: コン スト ラク タ と メソ ッ ド で 共通 に 使う デー タ 用 配列 sw の 宣言 で ある . 
L3: コン スト ラク タ と メソ ッ ド で 共通 に 使う デー タ 点 の 数 m の 宣言 で ある 
L4 て 17: コン スト ラク タ Gauss_Hermit の 定義 . 引数 m は 使う デー タ 点 の 数 で 
ある . 

5. L5 て 10: 使う デー タ 点 の 数 が 10 点 の 場合 の デー タ 点 の z 座標 値 と 重み で ある . 
6. L12: 引数 m の 値 を この クラ ス で 共通 に 使う フィ ー ル ド m に 代入 する . 

上 配列 sw に. それぞれ 





























COO) 時 














7. L14: m=10 の 場合 に . この クラ ス で 共通 に 使う デー タ 
L5, L8 か ら 始 まる デー タ 用 配列 の 参照 を 代入 する . 
8. L17: コン スト ラク タ Gauss_Hermit の 定義 の 終了 . 
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9. L19 て 35: メソ ッ ド gauss_Hermit の 定義 で ある . 引数 の Func は イン タフ ェ ー ス 

MyFunction クラ ス の イン スタ ンス で あり , 解 を 求め る 関数 が 定義 され て いる . 

戻り 値 は 積分 値 で ある . 

10. L21: 積分 値 を 足し 込ん で いく 変数 sum を ゼロ で 初期 化す る . 

11. L22: デー タ 点 の 数 が 偶数 の 場合 と 奇数 の 場合 で 処理 が 異な る の で , その 判定 を 
する . 

12. L23: 偶数 の 場合 の 処理 が 始ま る . 変数 mm に デー タ 点 の 数 の 半分 を 代入 する 

13. L24 へ て 27: x の 負 側 の 処理 を , 絶対 値 の 大 きい 左側 か ら 始 め , 積分 値 を sum に 加 
える . 

14. L28 へ 31: x の 正 側 の 処理 を , 小さ い ほ うか ら 始 め , 積分 値 を sum に 加え る . 

15. L34: sum を 積分 値 と し て 返す . 

16. L35: メソ ッ ド gauss_Hermit の 定義 の 終了 . 

17. L36: クラ ス Gauss_Hermit の 定義 の 終了 . 


















































誤差 の 評価 























数 値 積分 の 誤差 の 評価 を , 重み 関数 (z) が ある 一 般 的 な 場合 で 検討 する . 区 間 
lg,6] に お いて , 重み 関数 w(z) を 掛け た 関数 げ (z) の 定 積分 は , ある ヵ 個 の 点 に お け 
る 7(z。) の 値 の 1 次 結合 に よっ て 




















ゎ 2 
/ の (Z)7(z)d2 = 当 2 の : げ (zz) 十 朋 (5.44) 

















で 近似 する こと が で きる . この 右辺 第 1 項 は 積分 の 近似 式 で ,。。 は 関数 (z) に 無 関 
係 な 正 の 重み 定数 , 第 2 項 は 誤差 の 項 で ある . 重み 定数 w, は 次 の よう に し て 決め る こ 
と が で きる . げ (z) が 次 まで の 多項式 な ら 近 似 は 正確 な 式 と な る の で , 誤差 は 有 ア =0 
と な る こと を 条件 と する . この こと は , 7 < で 




















ヵ 72 
/ の (Z)z7dz ニー う wig (5.45) 
の ? 王 1 


が 成り 立つ よう に する こと で ある . パニ ヵ ァ ー1 と すれ ば , この 式 で 7= ニ 0 て (ー1) ま 
で の ヵ 個 の 連立 方 程 式 が で きる か ら , z, が すべ て 決ま っ て いれ ば y ヵ 個 の ww。 を 決め る 
こと が で きる . これ は ニュ ー ト ン ・ コ ー ツ 型 積分 公式 で あ も る. また, パ =2 ヵ ー1 の 場 
合 に は , 2 ヵ 個 の 連立 方 程 式 が で きる か ら , すべ て の z, も 未知 数 と し て ヵ 個 の w。 と と 
も に 決め る こと に な る . これ は ガウ ス 型 積分 公式 で ある . げ (z) が (V+ 1) 階 連 続 微分 
可能 で ある と し て , 点 c で テー ラー 展開 する と 






























































の 計 3 半 /O 〇 EACO7E の で まり 77 だ お 
5.46 
1 土 


で ある . これ を 式 (5.44) に 代入 し て 移行 する と 


e+Ddz 


19(@)(@ 


ー S oi が パ + リ 


| の 最大 値 を 47 と 置き , 





隊 0= ge 


と な る . 積分 領域 で の | が ぐ + り (z) 
積分 領域 の 中 心 (4 0)/2 に と る と , 














ら , 上 の 式 か ら 
6-g ぴ 9 ー 
RS ymny Tr e+ と 
で ある . 式 (5.45) で 7=0 を 使う と 
ヵ 7 
/ edz = の 
人 4 一 1 
で ある か ら , 最後 に 不等式 
6ー の WTM 
に な っ た . これ か ら 誤 差 の 限界 は , ヵ 点 の デー タ を 使 


式 で は ヵ 階 微分 の 項 で ある が , ガウ ス 型 積分 公式 で は 27 
積分 領域 を 大 きく と りす ぎ た り し な けれ ば , 非常 に 効率 の 





演習 問題 





(5.47) 





テー ラー 展開 を し た 点 c を 


全 積分 領域 お いて >ーc| <(5- g)/2 で ある か 


(5.48) 


(5.49) 


(5.50) 


う ニ ュー トン ・ コ ー ツ 型 積分 公 


階 微 分 の 項 7 に な る の で , 





良い こと が わか る 








5.1 

















ms ガウ ス ・ ル ジャ ンド ル の 積分 公式 を 複数 回 使う . 





選 


5.2 











人 デ ) の 値 を 求め な さい . 





rs ガウ ス ・ ラ ゲー ル の 積分 公式 を 使う . 


を ーー dyー ィ で ある . 7 の 値 を 3 桁 求 め な さい . 
0 22 二 1 


答 : 3.14 


第 0 章 








常 微分 方 程 式 の 解法 





6.1 








微分 方 程 式 で は な く 普 通 の 方 程 式 の 解 を 求め る と , 解 の いく つか の 値 が 決ま り , そ 
の 値 を その 方 程 式 に 代入 する と , その 方 程 式 が 成り 立つ こと に な る . 他方 , 微分 方 程 
式 を 解く と いう こと は , 解 の いく つか の 値 を 決め る の で は な く , その 関数 を その 微分 
方 程 式 に 代入 する と , その 微分 方 程 式 が 成り 立つ よう な 関数 と し て の 解 を 求め る こと 
で ある . 











1 階 常 微 分 方 程 式 





1 階 常 微分 方 程 式 


dy(?) 
dz 


の 解 ヵ (z) を , 初期 条件 





=7(e。 の ) 0 

















9(zo) (6.2) 


の も と で , 数 値 計算 に よっ て 求め る こと を 検討 する . この 問題 を 積分 形 に 変換 す 
る と, 


9=w+/ 「 (6 が (9)d (63) 














と な る . この 式 で は 積分 変数 を ヵ > で は な く ,: と し て いる . いま , 初期 条件 の (4。, 
9(zo)) か ら 解 を 求め 始め て , 離散 的 な 点 の 。 まで は 編 = ッ y(z,。) が 求め られ て いる と す 
る . 次 の 点 z。+ ュ = ティッ 。 キ ん で の 関数 値 は 式 の 上 で は 








ヵ 十 ん 
同 吉 記 記 人 / 7(*, 9)de (6.3) 





で 求め られ る . し か し , z。 から 先 の z で は 9() は 決め られ て いな い の だ か ら 。 
げ (Z, 9(z)) も まだ わか ら な い . そこ で , この まま で は , この 積分 を 計算 する こと は 
で き な い . この 式 に 平均 値 の 定理 を 使う と , 


























am1ー 多 二 が (Z。 圭 9 9(zy 填 の )) (0 く 9<1) (6.5) 
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図 6.1 微分 方 程 式 2 = 7 y(c)) の 関数 7(y) (だ 図 ) と 解 の 関数 y(z) ( 有 図 ) 左 図 の 





常 微分 方 程 式 の 解法 


と な る . し か し , これ で も z>z。 で の が (z) の 値 9?(z。 十 9 ヵ ) は まだ わか っ て いな い の 
で 使え な い . 

も し , 関数 7(z, ヵ ) が > の み の 関 数 で , に 依存 し て いな けれ ば , 7(z) は わか っ て い 
る の で , 式 (6.4) は 普通 の 定 積分 で ある . ヵ カ = ァ ュー ァ 。 を 小さ な 刻み と し て , 台形 公 
式 を 使え ば . それ は , 




















nm の ニ 4(37( の (mem)) (66) 
と な る . 
例題 と し て , 関数 げ (Z, ヵ ) が ヵ に 依存 し な い 了 げ (z) の 微分 方 程 式 
dy( 々 ) OO 
0 げ (z) ニッ デー 20z (6.7) 


を 取り 上 げ る . これ を 積分 形 に する と 





と 1 
9( 々 ) -/ ゲー20zd 三 10z2 十 c (6.8) 





と な り , 積分 定数 c が 1 個人 る. この 積分 定数 は , 積分 の 場合 に は 積分 の 下限 値 (z。) 
を 指定 すれ ば 決ま る . また , 上 限 値 >) も 指定 すれ ば , 積分 は 定 積分 に な る . これ が 
微分 方 程 式 の 解 で も る と き に は , 初期 値 (zo, (zo)) を 指定 する こと に よっ て c の 
値 が 決ま る . 両者 の c の 決め 方 は 異な る よう に も 見 える が , 本 質 的 に は 同じ こと で 
あぁ ある. 図 6.1 左 図 の 実 曲線 は 式 (6.7) の 関数 /(> ヶ ) で あり , 右 図 の 実 曲線 は 下限 値 を 
zo 三 0.0. ある い は 初期 値 を (0.0, 0.0) と し た 場合 (c= 0.0) の 解 の 式 (6.8) で ある . 左 
図 で . ヵ = 1.0 と し て 台形 公式 を 使っ て 積分 する と , 右 図 の 関数 ヵ (z ヵ ) に グラ フ 上 で は 
重なっ て いる 値 が 得 ら れる . 右 図 の 一 点 鎖線 の グラ フ は , 下 か ら 初 期 値 (0.0, (0.0)) 
の (0.0) を 25.0, 50.0. 75.0 と し た と き の も の で あり , 実 曲線 を 上 に 平行 移動 し て いる 
だ け で ある . 逆 に 考え る と 右 図 の 各 グ ラフ の 勾配 が 左 図 の 単 一 の 関数 /( ヶ ) に な る の だ 
か ら , 右 図 の 各 > 点 に お ける すべ て の 勾配 は 等 し い の で ある . 
































































































































I00 


















































線 は 関数 (z) = z? - 20z で あり , 右 図 の 線 は 積分 y(*) = sr" - 10x? で ある . 左 図 で 
ヵ =1.0 と し て 台形 公式 を 使っ て 微分 方 程 式 を 解く (積分 する ) と , 右 図 の 関数 ヵ (z) に グラ フ 
上 で は 重なっ て いる 値 が 得 ら れ た . 右 図 の 一 点 鎖線 の グラ フ は , 下 か ら 初 期 値 (0.0, 7(0.0)) 




































































の %(0.0) を 25.0, 50.0, 75.0 と し た と き の も の で ある . 左 図 の 点線 は , 微分 方 程 式 の 解法 の 粗 
い 近 似 で ある オイ ラー 法 の 短 形 公式 を 使っ て 式 (6.3) を 積分 する と き の 短 形 で ある . 得 ら れ た 





























解 の 関数 y(z) が 右 図 に 点線 で 示さ れ て いる 











6.2 


一 段階 法 97 


他方 , 関数 (>, ) が に も 依存 し て いる 場合 は 複雑 に なる . この 一 般 的 な 場合 を 





論じ る た め に , 編 」 ュ テッ タ (z。 填 人) を ター ァ 。 で テー ラー 展開 する と, 

















1 1 
(2m 填 ニー 十 が の (2) 二 9 (zo) キト コー が 99(e 





三 尋 げ (7, の ) = > が た 開 





三 2 
と な る . こと で , 
9 三 ず げ 
ンー 
"ニー と の プー カリ 
p。 = 支 T7 吉 


の の 
7。 = |( 計 7 吉 ) 


ヵ ) 十 …・ 


(6.10) 


を 使っ た . 式 (6.9) を どこ で 打ち 切る か と いう 近似 の 度合 いや , 次 の 点 の 値 ,」」 の 計 





算 方 法 に よっ て いろ いろ な 解法 が 工夫 され て お り , 大 きく 分 ける と , 





階 法 、 予 出 子 ・ 修 正子 法 な ど が ある . 





一 段階 法 


一 段階 法 。 多段 





6.2.1 オイ ラー の 前 進 公 








一 番 単 純 な 一 段階 法 は 式 (6.9) 右辺 の 第 2 項 ま で を 使う オイ ラー 法 で あり , 











ヵ +1 の 十 が げ (。。 9 の 。) 





(6.11) 


と な る . これ は オイ ラー の 前 進 公 式 と も いわ れる . 使わ な か っ た 第 3 項 以降 は , 打ち 


切り 誤差 と な り , この 場合 は , 


1 
A」 1 三 の ヵ 十 が 7(?。, 9。) ー 1 三 - ぅ だ [の 。 乃 。 十 o() 








(6.12) 


な の で , 2 の オー ダー で ある . ヵ を 細か くす れ ば , 打ち 切り 誤差 は 小さ く な る が , 計 
算 の 回 数 が 増え る の で , 計算 時 間 が か か る だ け で な く , 丸め の 誤差 も 蓄積 され る こと 
に な る . 図 6.1 左 図 の 点線 は , オイ ラー 法 の 場合 の 逢 形 公式 を 使っ て 積分 する た め の 
線 で あり , 得 ら れ た 解 の 関数 (z) は 右 図 に 点線 で 志 さ れ て いる よう に , z が 増す に 
従っ て 正しい 解 の 実線 か ら 離 れ , 誤差 が 蓄積 され て いく. 右 図 の 一 点 鎖線 の グラ フ は 
下 か ら 初 期 値 (0.0, (0.0)) の (0.0) を 25.0, 50.0. 75.0 と し た と き の も の で あり , グ 
ラフ は 上 に 平行 移動 し て いる だ け で ある . し か し , 一 般 的 な 微分 方 程 式 で , 7(Z, ヵ ) が 
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り に 依存 し て いる な ら , 右 図 の 各 グ ラフ は 平行 移動 し て いる だ け で は な く , それ な り 
に 異な っ た 形 を し て いく こと に な り , 同じ > の 値 で も の 値 が 異な る と その 点 で の 勾 
配 は 等 し く な いこ と に な る . 

















6.2.2 ルン ゲ ・ ク ッ タ 法 2 次 公式 








オイ ラー 法 は 式 (6.5) に お いて , 9= ニ 0 と し た ? ヵ (z。) を 使っ て いる こと に な る . 近 
似 を 良く する た め に , まず , オイ ラー 法 で ぬ 」 = 7(z。, ) を 使っ て 7 ニタ 十 が 
を 求め る . 次 に それ を 使っ て z』』」 ニ ッッ オ ん で の 値 。 = げ (。 十 。 十 Ak) = 
(en 9。) を 求め 、 先 の ね と と も に 使っ て 9。+i を 決め な お すこ と も で きる . す 
な わ ち , 














(②) 1 1 
の ーw+A( m+) 
還 2 2 (6.13) 
た だ し , ii ニテ げ 少 カ > 多 ), ニテ ガ Z。 二 ん の 。 十 AA) 


で ある 2⑪ の () は 近似 の 程度 を 区 別 す る も の で ある . と の 重み を = と し 
と 。 の 平均 値 を 使う この 公式 は . ルン ゲ ・ ク ッ タ 法 2 次 公式 と いわ れる . は 
ァ ー ィ 。 で の %(Z) の 正確 な 勾配 7(z, 。) で あり , 6 は 近似 で は ある が ァ ー ァ 。 二 で 
の 勾配 げ (z。 志久 填 kr) で ある か ら , この 平均 を 勾配 と し て 使う こと で , か な り 改 
良さ れ て いる こと に な る . 次 に 述べ る 導出 法 で 調べ る と , ヵ の 2 次 の オー ダー まで は 
正確 で あり , 打ち 切り 誤差 が の オー ダー と な る よう に な っ て いる . 式 (6.13) を 拡張 
し て 一 般 的 に 



































4 
1 古寺 か う wi 大 
? 王 1 
? 一 1 


太 ニ が (の 2。 二 の ん 婦 十 2 gg) (6.12) 


7 三 1 


(6.15) 
6 げ (Z。 中 Ag, ダ ヵ oo ん ) 
と な る . この 玉 と を (z。,) の 周り で 展開 し た 
二 6 げ の げ 2 
=ー 訪 十 9 計 斉 | ee ) (6.16) 


を 式 (6.14) に 代入 する と 


の) ひ 
9 ヵ +1 三 め 十 ん (on キ %92) 訪 幸 7 の も の 脱 名 | 二 o() (6.17) 


6.2 一 段階 法 99 
と な る . 一 方 , 式 (6.9) か ら の 
1 
m+ の = 寺 5| 十 o() (6.18) 
上 隊 まあ Ne ee と 5 の 関係 を 得る - ここ で , = テ を 選ぶ と 


示 人 0 あ SD。 義 M 痕 叶 は 09ING あ 








図 6.2 の 左 図 は ルン ゲ ・ ク ッ タ 法 2 次 公式 の 説明 図 で あり , 右 図 は ルン ゲ ・ ク ッ タ 














法 4 次 公式 の 説明 図 で も ある. この 場合 の 微分 方 程 式 は 9 に 依存 し な ぃ の - 
で あり , 正確 な 解 yy) = =r9 の グラ フ を 実線 で 図示 し て ある . zo 05 
1.5,、 ヵ =1.0 と し て , 状況 そ を は っ きり させ る た め に 刻み ヵ を 大 きく と っ て ある . 


























1 2 
Di 
1 三 


点線 


の 矢印 は 太 = げ (zo) で あり , オイ ラー 法 を 使っ た 場合 に は 解 の 関数 の 値 y(x」) は この 
点線 の 矢印 の 先端 で あり , 正しい 解 で ある 実線 と は か け 離 れ て いる . 左 図 の 破線 の 矢 

















Rb MA 





で ある . ルン ゲ ・ ク ッ タ 法 2 次 公式 を 使っ 


た 場合 に は , 解 の 関数 の 値 y(z」) は 実線 の 矢印 の 先端 で ある か ら , 点線 の 矢印 の 先端 











と 比較 する と か な り 改 良さ れ て いる . ちな み に , 式 (6.5) の 平均 値 の 定理 は [zo, z」] 


了 で きる だ け こ の 値 





近い た を 作れ ば よい と いう こと で ある . 関数 7(z, ) が ヵ に 依存 する 場合 に は , 


関数 











55 の 0 お PP の に 


と な っ て 値 も 微妙 に 異な っ て くる . 


2r y(%) 







00 1 2X 














図 6.2 ルン ゲ ・ ク ッ タ 法 2 次 公式 ( 左 ) と ルン ゲ ・ ク ッ タ 法 4 次 公式 ( 石 ) の 説明 図 . 微分 
方 程 式 は 9 に 依存 し な い ご の) 42 で あり , 実線 の 曲線 ほそ の 正確 な 解 (o) = ac" で 
ある . 左 図 は ルン ゲ ・ ク ッ タ 法 2 次 公式 の 場合 で あり , 点線 の 矢印 は = げ (zo), 破線 の 
矢印 は p ニ 7(zi) で , 実線 の 矢印 は 滞 土 旭 で ぁ る . 右 図 は ルン ゲ ・ ク ッ タ 法 4 次 公式 の 


場合 で あり , 点線 の 矢印 は 太 = げ (zo), 人 線 の 欠 印 は 4a ニナ ( 3 うち A ] 一 県 人 線 の 


矢印 は &s = げ ( ち 90 十 5 ). 二 点 鎖線 の 矢印 は 太 = げ (zn, 90 十 6s ) 3 実線 の 矢印 は 





巡 | 

































































を テー ェ ( 太 士 2 十 26s 十 太 ) で ある . 


8 
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6.2.3 ルン ゲ ・ ク ッ タ 法 4 次 公式 





ルン ゲ ・ ク ッ タ 法 2 次 公式 で は 式 (6.14) で ゥ =2 と し て いる が , ゎ =4 と し た 公式 は 
ルン ゲ ・ ク ッ タ 法 4 次 公式 と いわ れ , 最も よく 使わ れ て いる . その 場合 に は , 


7 
9 の + ュ 三 の 。 十 6 ー(A 十 26。 十 26s 十 奴 ) 





ん // 
っ ) の 玉 2 ) (6.19) 


な 3 げ (?。, 9 の), の 記 げ ( 十 5 


7 // 
太 ニナ ( 3 ). 太 ニル 2 十 ん 9 の 。 十 5 ) 


2 


で ある . 太 は ヶ テ ァ ,。 と ぬ は る =aa 寺 う 」 は ァァァ 。 二 で の 値 で あり , 図 6.2 


右 図 に 示さ れ て いる . 実際 に 使う な と し て は , 式 (6.19) の 第 1 式 か ら わ か る よう に , 
zo a 十 5 ッ m+ ん で の 重み が ろ 3 = と な っ て いる か ら 。 シン プ ソ ン の 積分 公式 に 


類似 し た も の で ある . この 公式 の 打ち 切り 誤差 は 5 の オー ダー で ある . 











多 有 段階 法 と 予測 子 ・ 修 正子 法 





式 (6.3) を 等 間隔 に と っ た 分 点 を 使っ て 求め る 場合 に は , 式 (6.4) の 代わ り に 少し 前 
(z。_。) の 値 に まで さか の ぼっ て , 


。 十 ん 
の x+ ュー 2 +/ げ (Z, 9(z))dz (6.20) 


を 使う こと が で きる . た だ し , > g で な けれ ば な ら な い . また , 0<?<g の 外人 に 
つい て は , 別 の 方 法 で 求め て お か な けれ ば な ら な い . > 0 の と き , この 方 法 は 多段 
階 法 と いわ れる . 既知 の を 使う 補間 法 を 適応 する と 定 積 分 は 解析 的 に 求め られ , 
式 (6.20) は 














ア 
の ヵ +1 三 の:-g ヵ う _ 20 (Z。ー5 9 の ー7) 
(6.21) 





9 ヵ ーg 二 ん うい の 訪 -: 
? 王 0 








と な る . g と ゎ ヵ の 各 組 み 合 わせ に つい て , tp, の 値 を 決め る こと が で きる . この 方 法 は , 
すべ て 既知 の の 値 を 使っ て いる の で , 陽 的 な 多段 階 活 と いわ れる 
一 方 , 式 (6.21) に お いて , 未知 の 訪 」,」 まで 使う 方 法 は 陰 的 な 多段 階 法 と いわ れ , 














の ヵ +1 三 の 2-g ヵ う (の エ 1ー カ の エー) 
? 王 0 


三 。%-g 十 うし の 訪 ュ ー: 


(6.22) 
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で ある . この 方 法 を 使う た め に は , ルン ゲ ・ ク ッ タ 法 の 場合 の よう に , 前 も っ て 訪 呈 
の 値 の 予測 値 を 求め な けれ ば な ら な い . 7 と ゎぁ の 各 組 み 合 わせ に つい て , 。 の 値 が 定 
め ら れ て お り , 例え ば 


9 三 0. ヵ の テ 1: 
M 誠 
ヵ +1 三 の 。 十 5 ヵ Us 訪 +1) 台形 公式 
(6.23) 
9 三 1.2 テ 2: 





ん ら き 
9 ヵ +1 三 1 十 3( あ コ キキ 4 訪 寺 訪 +1) シン フン ソ ン の 公式 





が ある . この よう な 方 法 は 予測 子 ・ 修 正子 法 と いわ れ , 陽 的 な 多段 階 法 (予測 子 ) と 陰 
的 な 多段 階 法 (修正 子 ) の 組み 合わ せ で , いろ いろ な 方 法 が ある . 例え ば , 








ロロ ミル ン 法 


(予測 子 ) の ヵ +1 三 92--8 二 A(2 訪 2 ーー ココ 十 2 ん ) 








(6.24) 
(修正 子 ) 9 


+1 三 め の -1 二 


Col S の | 選 


( 訪 - ュ 0 4 訪 す 訪 エ 1) 


ロロ アダ ム ス ・ ム ルト ン 法 


( 潮 子 ) 婦 m= 娠 二 (-9-s 寺 7 な っ ー59 な ュ オ 55) 


に (6.25) 
(修正 子 ) の ヵ +1 三 め , 十 紀 り z-2 ーー 5 訪 -1 十 19 ん 十 9 訪 1) 




















な ど で あ る . 
6.4 高階 常 微分 方 程 式 (人 工 衛星 の 軌道 計算 ) 
高階 常 微 分 方 程 式 
= げ (z, 0 の PT が の の ー リ )) 


(6.26) 
は , 例え ば , ッ を 編 に 書き 換え る な ど を し て , 























d2 タ 
( ーー -) 9 三 98 (6.27) 
dd 
( 記 -) 0 一 げ (?, の 92) っ の ヵ ) 
の よう な 7 ヵ 元 連 立 1 階 常 微分 方 程 式 と する こと が で きる . 各階 の 方 程 式 の 選び 方 は 





任意 で ある か ら , これ 以外 に 適当 に 選ぶ こと も で きる . 実際 式 (6.35) は そう で ある . 
2 


次 に , 連立 1 階 常 微 分 方 程 式 の 解説 を 行う . 
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微分 方 程 式 の 解法 


6.4.1 連立 1 階 常 微分 方 程 式 








7? 1 


固 の 従属 変数 を も つ ヵ 元 連 立 1 階 常 微分 方 程 式 の 場合 に は , 解 を ベク トル 関数 


























y ニ ( 引 ,…,。) で 表す . 連立 方 程 式 と 初期 条件 は 


ーー ーf(Z, アダ), ァ ーzo0 で テッ (zo) (6.28) 




















で ある . これ に , ルン ゲ ・ ク ッ タ 法 4 次 公式 を 適用 する と 


7 
Y ヵ +1 三 ヵ 十 6 十 2k。 十 2ks 十 k4) 
k」 ニ f k ゥ > ニーf M 
ューf(Z Y)) 2 三 ?。 十 ぅ ' Y ヵ 十 5 (6.29) 


7 7 
ks = ニ f (* 十 ゥ ” Y ヵ 十 ke 5 k。』 ニ f(Z。 十 ん , Y ヵ 十 Aks ) 


で ある . 
プロ グラ ム (RungeKutta4.java) の メソ ッ ド (rungeKutta4) と 、 そ の 説明 は 以下 の と 
お り で ある . 


RungeKutta4.java の メソ ッ ド (rungeKutta4) : 


1 
2 
3 
4 
5 
6 
7 
8 
回 


10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
ウ 沖 
22 
23 
24 
25 
26 
27 


pub1ic void rungeKutta4(doub1e[] y, MyFunction1 f, 

doub1e h, int isn) て 

1nt ny= 7.1ength: 

doub1e [] yw= new doub1e [ny] : 

double[] k1= new doub1e [ny] : 

double[] k2= new doub1e [ny] : 

double [] k3= new doub]e [ny] : 

double[] k4= new doub1e [ny] : 

doub1e h2= h/2: 

for (int is=0: is<isn: 18++) 
k1= f.function( す ) : 


for (int i=0: 1<ny: ュ ++) yw[1i]= y[i]+h2*k1[i] : 
k2= f.function(yw) : 


for (int i=0: 1<ny: ュ ++) yw[1i]= y[i]+h2*k2[i] : 
k3= f.function(yw) : 





for (int i=0: 1i<nyi 1++) yw[i]= y[i]+h*k3[i] : 
k4= f.function(yw) : 


y[0]= y[O]rh: 
for (int 1=1: 1<ny: 1++) { 

y[]= 7[i]+h6*(k1 [1]+2*k2[i]+2*k3[i] +k4[i] ) : 
+ 
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1. L1, 2 て 27: メソ ッ ド rungeKutta4 の 定義 で ある . 引数 の y は 配列 で , yIO] は 微 
分 方 程 式 y =f(z, y) の 独立 変数 ヶ , yl] 以降 は ,. ベク トル 関数 y(z) の 配列 で 
ある . メソ ッ ド か ら 戻 る と き に は , isn 刻み 進ん だ 変数 値 と 関数 値 が 代入 され て 
いる . f は イン タフ ェ ー ス MyFunction1 クラ ス の イン スタ ンス で あり , 解 を 求 
め る メソ ッ ド が 定義 きれ て いる .『 の メソ ッ ド に は 連立 微分 方 程 式 が 定義 され て 
お り , 戻り 値 は f(z,y) の 配列 で ある . h は 独立 変数 > の 刻み 幅 で , isn は jisn 

本 刻み を 進ん だ ら こ の メソ ッ ド か ら 戻 る こと を 指定 し て いる . 

L4: 関数 f(z, y) の z, y の た め の 作 業 用 配列 で ある . 

L5^8: 式 (6.29) の ki て k』 の 配列 で ある . 

L9: 5 を 定義 する . 

L10 て 26: 指定 され た 回 数 だ け , 刻み を 進め る . 

L11: 式 (6.29) の k」 の 計算 . 

L13, 14: 式 (6.29) の k。 の 計算 . 

L16, 17: 式 (6.29) の ks の 計算 . 

L19, 20: 式 (6.29) の k。 の 計算 . 

L22 て 24: 式 (6.29) の y。+」 の 計算 . 
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6.4.2 人 工 衛星 , 惑星 の 軌道 計算 (ルン ゲ ・ ク ッ タ 法 4 次 公式 ) 





人 工 衛星 や 惑星 は , 地球 ある い は 太陽 の 引力 を 受け て 、 それ ぞ れ の 周り を 椿 円 軌道 
を 描い て 周遊 し て いる . 引力 は 万 有 引 力 で あり , その 強 さ は 引力 の 中 心から の 距離 の 
2 乗 に 反比例 し て いる . そこ で , 運動 方 程 式 は 


2 ャ 777. 
7 の 時 9 (6.30) 
























































で ある . ここ で , ヵ は 衛星 ある い は 惑星 の 質量 . C は 万 有 引 力 定数 , 7 は 地球 ある い 
は 太陽 の 質量 , r()) は 衛星 ある い は 惑星 の 位置 ベク トル , r(⑰ は 位置 ベク トル の 単位 
ベク トル , 7 は 時 間 で ある. 実際 に は , 3 次 元 空間 で の 運動 で ある が , 1 個 の 衛星 ある 
い は 惑星 を 問題 に する の で あれ ば , 椿 円 軌道 面 を 含む 2 次 元 平面 に 限定 する こと が で 
きる . そこ で , ベク トル ェ r を 位置 座標 ( ヶ , ヵ ) と する . 運動 方 程 式 を 位置 座標 (>, ヶ ) 
を 使っ て , 微分 方 程 式 に 書き な お す と 





































































































2 

d2 補 了 G7 8 

d72 2 十 9 の ?)3 

0 (6.31) 
) OM 二 。 

d (z2 二 の)5 























図 6.3 


点 の 上 空 ykm で 水 


java) 





に 書 


淀 微分 方 程 式 の 解法 








(e+ の )3 





適用 する こと が で きる . 





図 6.3 は . ルン ゲ ・ ク ッ タ 法 4 次 公式 を 使っ て 計算 し た 人 コ ] 
初期 条件 と し て , 特定 の 地点 の 上 空 ykm と 水 


(0.0, 8.0) , 


























(6.32) 


き な お す . ここ まで 来れ ば ベク トル 関数 に 対す る ルン ゲ ・ ク ッ タ 法 4 次 公式 を 


[衛星 の 軌道 で ある . 
F 方 向 の 速度 ukm.s-+ の 4 組 
(0.0, 9.0) , (0.0, 10.0) , (0.0, 11.0) を 与え て いる . た だ し , 計算 に 使う 





y の 初期 値 と し て は , 初期 条件 と し て 与え る 地表 か ら の 高 さ に 地球 の 半径 を 加え て 


いる . 


ヽ 





プロ グラ ム (RungeKutta4Test.java) の 連立 方 程 式 の クラ ス (Func) と ,。 その 説明 は 以 
下 の と お り で ある . 


orbit of satellite 
interval nf lat = 240.0 secnnds 
ImaTk nf nrhit= 


トコ に 2 Q ※ 
initial height = d.9 q.9 d.9 d.9 
Initial veloeity = 8.09 9.0 19.9 11.9 
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ルン ゲ ・ ク ッ タ 法 4 次 公式 を 使っ た 人 工 衛星 の 軌道 計算 . 初期 条件 と し て , 特定 の 地 











F 方 向 に 速度 p。 km・s-* で 打ち 出す と ヵ 。 を 与え る . (Z06_03_orbit_pro. 
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クラ ス (Eunc) の メソ ッ ド (fanction) : 


1 c1ass Func implements MyFunction1 { 
2 pupblic doub1e[] function(doub1e[] y) て 
8 doub]e gr= 6.67e-11: // 万 有 引 力 定数 
4 doub1e rmass= 5.977e+24:// 地球 の 質量 
5 doub1e GM ニ = gr*rmaSs : 
6 doubl1e[] f= new doub1e[y .1ength] : 
7 double r32= Math.pow(y[1]*y[1]+y[3] *y[3] ,-1.5) : 
8 f[0]= 1.0: 
9 iL 志 訓 妥 5 
10 f [2] = -GM*y[1] *r32: 
11 f[3]= y[4]: 
2 f [4]= -GM*y[3] *r32: 
員 S return 穫 : 
14 + ナ 
1U5 


1. L1 て 15: イン タフ ェ ー ス MyEFunction1 を イン プリ メン ト (実装 ) す る クラ ス Func 
の 定義 で ある . 

2. L2: メソ ッ ド function の オー バー ライ ド で ある . 引数 y は 配列 で , y|O] は 微分 

方 程 式 y =f(z, y) の 独立 変数 z,。 yh] 以降 は , ベク トル 関数 y(z) の 配列 で あ 

る . 戻り 値 は 式 (6.28) の f の 配列 で ある . 

L3 て 5: 万 有 引 力 定数 や 地球 の 質量 な どの 定数 で ある . 

L6: 戻り 値 の た め の 配 列 で ある . 

L7: 式 (6.32) の 距離 の 3 乗 の 逆数 で ある . 

L8: 独立 変数 自身 の 微分 で ある か ら , 常に 1 で ある . 

L9 て 12: 式 (6.32) の 計算 で ある . 

L13: 戻り 値 f を 返す . 























2 SM の 区 た の 
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微分 方 程 式 の 解 を ある 範囲 に わた っ て ルン ゲ ・ ク ッ タ 法 で 求め る と き , 刻み ヵ を 大 
きく する と 打ち 切り 誤差 は だ の オー ダー で 大 きく な る か ら , 刻み を 小さ くす る 必要 が 
ある . そこ で , ある 範囲 で の 解 を 求め る た め に , 数 百 か ら 数 千 回 繰り 返し て 計算 を す 
る 必要 が ある こと も ある . それ を 少し で も 改善 する た め に , 丸め の 誤差 が で きる だ け 
少な く な る よう に , ジル に よっ て 改良 され た , ルン ゲ ・ ク ッ タ ・ ジ ル 法 と いわ れる ア 
ル ゴ リ ズム が ある . それ は , 式 (6.19) の の 計算 に 付加 項 を 付け る も の で あり , 
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4 2 回 目 以降 は 直前 の 4 を 使う 
1 王 ヵ げ (zo0, 0) 























ん 
= / げ (* + ぅ : の) 


smatIC-V Je-|-(- 衣 ) 6 
が (ちる) 

すり 3 ) (mg 

sets[(rV5)e-g|-(rV)* 


ーー 7 が (zo 十 訪 6) 








で ある . 
図 6.4 は ルン ゲ ・ ク ッ タ ・ ジ ル 法 に よる 水素 原子 に お ける 電子 の 1s 動 径 波動 関数 で 
ある . この 場合 の 微分 方 程 式 は 動 径 シュ レー ディ ン ガ ー 方 程 式 と いわ れ 

| 2 70+1) 

















十 
ア 2 


dr2 ! 太 ⑦) ニ ち 表 ⑦) (6.34) 











6.4 ルン ゲ ・ ク ッ タ ・ ジ ル 法 に よる 水素 原子 動 径 波動 関数 . 点線 が , 固有 エネ ルギー 
が 玉 ニー -1Ry で 境界 条件 を 満た す 解 (固有 解 ) で ある . 実線 と 鎖線 は エネ ルギー が A ア = 
ー0.001, 0.001 ずつ ずれ て いる 場合 で あり , 無限 遠 で 発散 し て お り 固 有 解 で は な い ( 注 : 計算 誤 
差 が ある た め に , この 図 の 計算 で は 忌 ニ ー1Ry で は な く , アニ ー0.9990Ry で あっ た ). (Z06 
-04_Rkg_H.java) 
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で ある . この 式 は ,、 エネ ルギー の 単位 を Ry と し た 原子 単位 系 で 書か れ て いる . 位置 
座標 は , 電子 の 原子 核 か ら の 距離 で あり , 万 (7) は 電子 の 動 径 波動 関数 で ある . 7 は 
電子 の 方 位 量子 数 と いわ れ 7 > 0 で あり , 計算 に 先立ち 指定 し て お く . 忌 は 電子 の 
エネ ルギー 準 位 で あり 。 = な 位置 エネ ルギー で ある . 解 の 境界 条件 は , 互 (0) = 0 
(0) cc 7。 互 (oo) = 0 で ある . も し , 解 の 境界 条件 が 初期 条件 の 肪 (0) = 0.、 戸 (0) cx? 
だ け で あれ ば , あら ゆる 玉 に つい て 解 と な る 動 径 関数 を 求め あこ と が で きる が , 
電子 が 原子 に 東 縛 さ れ て お り , 遠く に ある 確率 は ゼロ で ある と いう 物理 的 な 条件 
万 (oo) = 0 が も う 一 つの 境界 条件 と な り , この 条件 を 満た す 解 の み が 物 理 的 に 意味 の 
ある 解 と な る . 
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式 (6.34) を 連立 1 階 役 分 方 程 式 に 変形 する た め に ,Q() = アー ーーP) と 還 
く と 
PC) = 9 の 0+ 王 =PC) 
(6.35) 
9 の = (-+g) PO- 芋 -o の 


と な る . 

エネ ルギー 固有 値 が 最も 低い 7=0 の 1s 状態 の エネ ルギー は 札 。 = ー1.0 な の で , そ 
の 近傍 を 検討 する . 図 6.4 の 点線 の 動 径 波動 関数 乃 7) が 1s 状態 に 対応 する も の で , 
無限 遠 で ちょ うど ゼロ に 収束 し て いる . 

プロ グラ ム (Z06_04_Rkg_H.java) の 一 部 と . その 説明 は 以下 の と お り で ある 









































Z06.04 Rkg_H.java の 一 部 : 
1 // 図 6.4 水素 の 動 径 波動 関数 206_04_Rkg_H.java 04/12/04 


49 cl]ass Z06_04_Rkg_HGraph て 


57 


85 
87 


89 
90 


99 
101 
102 
103 


105 
106 
107 
108 
109 


pub1ic void mydraw() て 


int 1max= 0: 
doubl]e z= 1: 


double[] xdivp= {0.0, 0.01, 0.05, 0.25, 1.0, 2.5, 5.0,10.0}: 
int [] numbdx= 120, 20, 20, 20, 20, 20, 20}: 


1nt ntotV= ntot+1 : 
1nt npott=2*ntot+1 : 
doub]e [] rpot= ne doub1e [npott] : 
doub]e [] pot= new doub1e [npott] : 


doub1e eam1n=-0 . 99999 : 
doub]e eamax=ー0 .99798: 


int ne= 3: 
doubl1e[] e= ne double [ne] : 
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117 
118 


121 
122 
123 
124 
125 


138 
139 
140 


146 


177 


179 
180 
181 


185 


188 
189 
190 
191 


197 


199 
200 
201 
202 
203 


205 
206 
207 
208 


315 


318 
319 
320 
321 
322 
323 
324 


double [] xrkg= new doub1e [ntotY] : 
doub1e [] [] yrkg= new doub1e [ntotv] [ne] : 


1nt n ニ ク : 

xdivp[0]= (xdivp[1] -xdivp[0] ) /numbdx [0] : 
doub]e x= xdivp[O] : 

numbdx [0]= numbdx[0] -1: 

pot [n] = -2*z/x: 


Function func= new Function() : 
for (1=0: 1<=1max: 1]++) て 
1ogd(1 , e, pot, z, xdivp, numbdx , func, xrKE, YTKE) : 


pub1ic void 1ogd(int 1, doub1e[] e, doubl1e[] pot, 


doubl1e z, doub1e[] xdivp, int[] numbdx, 
Function func, doub1e[] xrkg, double[] [] yrkg) { 


double [] [] yw= new doub1e [2] [ne] : 


double f]11= ]+1: 

px0= xdivp[O] : 

vx0= pot[2] : 

for (int =0: 1<ne: ユ ++) { 


Rkg_atom rk= new Rkg_atom() : 
rk.rkg_atom(1] , xd1vp, numbdx , funC, YV, XrKE, yTKE, DOt, @) : 
etuTn : 


class Rkg_atom て 


pub1ic void rkg_atom(int 1, double[] xdivp, int[] numbdx, 
Function funct, double[] [] yw, doub1e[] x, double[] [] y, 
doub1e[] pot, double[] e) { 


class Function 
pub1ic void function(int 1, doubl1e x, doubl1e[] [] yw, doub1e[] [] 


int ipn, doub1e[] pot, doub1e[] e) { 


nt ne= e.]ength: 
doub1e vrr=pot [ipn] : 
doub]1e r2=x*X: 


MDD 
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doubl1e f]11= 1]+1: 


for (int 1=0: 1<ne: 1++) て 
ypw[0] [1]=yw[1] [1]+f11*yw[0] [1] / テ : 
ypw[1] [1]=(vrr-e[i] ) *yw[0] [1] -f11*yw[1] [1] /x: 


+ 


re て tuTn : 


17. 


6.5 は , 
径 波 








L49 へ 203: 計算 と 描画 を する クラ ス Z06_04_Rkg_HGraph の 定義 で ある 

L57 て 177: 計算 と 描画 を する メソ ッ ド mydraw の 定義 で ある . 

L85, 87: hmax は 計算 する 方 位 量子 数 の 最大 値 で も り , ここ で は 1s 軌道 だ け で 
ある か ら 0 で ある . z は 原子 番号 で あり , ここ で は 水素 で ある か ら 1 で ある 
L89, 90: ルン ゲ ・ ク ッ タ ・ ジ ル 法 は z 座 標 の 等 分 割 を 使う か ら , 関数 の 変化 の 激 
し い 原 点 近 傍 か ら 遠 方 に 行く に 従っ て , 刻み 幅 を 段階 的 に 広く し て いる . xdivp 
は 刻み 幅 を 変え る x 軸 の 分 点 で あり , numbdx は その 間 の 等 分 割 点 の 数 で ある . 
L99 て 103: ntot は 分 割 点 の 総数 . ntoty は 求め る 波動 関数 の 点 の 数 、 npott は 用 
意 し て お く ポ テン シャ ル の デー タ 総 数 で ある . ルン ゲ ・ ク ッ タ ・ ジ ル 法 の 1 刻み 
で , ポテ ン シ ャ ル は 2 点 で 必要 で ある か ら , npott は 2 倍 さ れ て いる . rpot は 
座標 で あり , pot は ポテ ン シ ャ ル 値 で ある . 

L105 て 109: 波動 関数 を 求め る エネ ルギー 値 e, 数 ne, 最小 値 eamin, 最大 値 
eamax で ある . 

117, 118: xrkg は 分 点 の 座標 , yrkg は 答え の 波動 関数 で ある . 

121 て 124: ポテ ン シ ャ ル は 原点 で 発散 し て いる か ら , 原点 を 初期 値 と する こ 
は で き な い の で , 1 刻み 進ん だ 点 (nー2) を 初期 値 に する . その た め の 変 更 で 
る . 

125: 初期 条件 で の ポテ ン シ ャ ル の 値 を 決め て いる . 以後 , 各 分 点 で の ポテ ン 
ャ ル の 値 を pot に 代入 し て いる . 

138: 微分 方 程 式 の クラ ス (L318 て 333) の イン スタ ンス を 作成 し て いる . 

139 て 146: 各 方 位 量子 数 ご と に すべ て の エネ ルギー に 対す る 解 を 求め る . 

179 て 203: この メソ ッ ド logd で は 微分 方 程 式 を 解く 準備 を し , 微分 方 程 式 を 解 
, 解い た 後 の 処理 を する . 

185: ルン ゲ ・ ク ッ タ ・ ジ ル 法 の 各 刻 み で の 解 を 代入 する 作業 用 配列 で ある . 
188 て 197: 波動 関数 の 初期 値 を 決め る 際 , 微分 方 程 式 を 級数 展開 し て 2 次 の 項 
で と り , 精度 を 上 げ て いる . 

L199, 200: 原子 の 波動 関数 を 求め る ルン ゲ ・ ク ッ タ ・ ジ ル 法 Rkg_atom の イン ス 
タン ス を 作り 流動 関数 を 求め て いる 

L205 て 315: ルン ゲ ・ ク ッ タ ・ ジ ル 法 の クラ ス Rkg_atom で ある . 刻み 幅 を 変え 
られ る よう に な っ て いる . 

L318 て 333: 2 元 連立 方 程 式 (6.35) が 定義 され て いる クラ ス Funtion で ある . 
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ルン ゲ ・ ク ッ タ ・ ジ ル 法 に より 求め られ た , 水素 原子 に お ける 電子 の 動 











助 関数 の 直交 規格 性 を 示す 図 で ある . 下図 の 実線 と 破線 は 1s と 2s の 動 径 波動 関 
































数 で あり , 














固有 エネ ルギー は 1s が = ニー1Ry,。2s が 玉 ニ ー1/4Ry で ある . 点線 は 1s 
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6.5 水素 原子 動 径 波動 関数 の 直交 規格 性 . 下図 の 実線 と 破線 は 1s と 2s の 動 径 波動 関数 で 
あり , 点線 は 1s と 2s の 動 径 波動 関数 の 積 で ある . 上 図 の 実線 と 破線 は 1s と 2s の 関数 の 2 乗 
を 0 か ら r7 ま で 積分 し た 値 で あり , 点線 は 1s と 2s の 関数 の 積 を 0 か ら 7 ヶ まで 積分 し た 値 で あ 
る . (Z06_05_Rkg_H_1s2s.java) 


巡 | 














巡 | 




















% 














と 2s の 動 径 波動 関数 の 積 で ある . 上 図 の 実線 と 破線 は 1s と 2s の 関数 の 2 乗 を 0 か ら 
/ まで 積分 し た 値 ge)Pe* で あり , > が 大 きく な る と 1 に 収束 し て , 関数 が 規 
格 化 され て いる こ じたい か 点線 は 1s と 2s の 関数 の 積 を 0 か ら ヶ まで 積分 し 
た 値 / の <C9d で あり 、 7 が 大 きく な る と 0 に 収束 し て 、 両 関数 が 直交 し て 
いる こと を 示し て いる 。 





演習 問題 














6. 
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速度 に 比例 する 抵抗 力 を 受け る 単 振動 は 減衰 振動 と な り , 運動 方 程 式 は 
dz2 上 dz 2 陸 dz 2 ミニ 5 

3 ーー2 を 一 ー の ^ で ある . ここ で , 2k 一 は 抵抗 力 、。2z は 復元 力 で ある . 
gー1 と し , =0.0, 0.1, 3.0 の 場合 に . どの よう な 振動 を する か 調べ な さい . 


た だ し , 初期 条件 は ぇ = ニ 0 で =1, 〒 0 と する . 


解答 例 : ソー スプ ログ ラム QO06._01.Z06_03_shindou.java 











































































































































































































第 7 章 
章 
\ 1 w や 
連立 1 次 方 程 式 の 解法 
連立 1 次 方 程 式 は 数 値 解 析 の 多く の 場面 に 現れ , 本 書 で も , 最小 二乗 法 。 固有 値 問 
題 の 直接 法 。 ス プラ イン 関数 を 扱う と き な ど で , 陰 に 陽 に 使わ れ て いる . 連立 方 程 式 
な ど を 行列 形式 で 表現 する と 極め て 簡潔 に な る の と 同じ よう に , 最近 は , 行列 計算 を 
行う ハー ドウ ェ ア や プロ グラ ミン グ 言 語 も 存在 し て いる . し か し , それ ら を 利用 する 
こと は 非常 に 高価 で あり , な か な か 使え る も の で は な いか ら , これ まで どおり , ルー 
プ を まわ し て 計算 を する 必要 が ある . 
単純 に いう と , ( ヵ x ヵ ) 型 の 行列 の 大 き さ ぁ ヵ が 2 倍 に な る と , 処理 は 8 倍 に な る の 
で , 行列 の 大 き さ に 応じ て アル ゴリ ズム の 使い 分 けが 必要 で あり , また , ゼロ と な っ 
て いる 要素 が 少な い 密 行列 と , それ が 多い 疎 行 列 と で も , アル ゴリ ズム の 使い 分 けが 
必要 で ある . 
な お , 本 章 の 本 文 で は 行列 要素 な ど を ヵ 」 て gg。 の よう に 1 て 7 と し て いる が . 
Java プロ グラ ム で は al][O] て aln-1lIn-11 の よう に 添字 番号 を 0 マッ ター1 と し て いる 
こと に 注意 し て ほし い . 
7.1 連立 1 次 方 程 式 
まず , 次 の 3 元 連 立 1 次 方 程 式 
3 ァ ー の 十 2z 1 …・(1 
2 ァ z 一 4 のり 十 3z ー1 ・(3 
を 解い て みよ う . z を 消去 する と 
3 ヶ ー 9 十 三 。 1 …・(1)7 
3*(2) 一 (1) : 4 十 ー1 (2)/ (7.2) 
(3* (3) 2*(1))/5 : ー27 十 三 一 1 (3) 
と な る . (3)/ で は 簡単 に する た め に 5 で 割っ て ある . 次 に ゅ を 消去 する と , 
3ー 7 十 2z= (1)? 
4/ 十 (2)/ (7.3) 
2*(3)7 十 (2)「: 3z 三 (3 
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と な る . (3)/ か ら 順に z, の を 求め て いく と , 解 


を 々 ニー1。 テー0, ? テ 1 (7.4) 





7.1.1 ガウ ス の 消去 法 








計算 機 の プロ グラ ミン グ に お ける ガウ ス の 消去 法 は , 式 (7.1) ^ 式 (7.4) の 方 法 と 原 
理 的 に は 同じ 方 法 で ある . ガウ ス の 消去 法 に お いて , 式 (7.1) ^ 式 (7.3) の 消去 の 過程 
は 前 進 消 去 と いわ れ , 式 (7.4) で z か ら 順 に 答え を 求め て いく 過程 は 後退 代入 と いわ れ 
る . これ か ら は y ヵ ? 元 連立 1 次 方 程 式 





















































1 の] 十 g1222 二 … 十 gz の 三 
G21 が ] 十 G2222 十 … 十 g2z2。 三 05 (7.5) 
Gt の 十 225 十 … 十 G 記 2 三 6 

を 扱う . この 方 程 式 を 行列 を 用 いて 表す と 

















4x ニ = ニ b (7.6) 
で ある . ここ で , 
の 1 の 12 | q1p ダ ュ 1 
B 7 5 
4 ニー 21 0 の 22 2 、 xxー 宛 2 。 季 叶 2 (7.7) 
d ヵ 1 の ヵ 2 ui 間 還 /7777) 7 6 ヵ 





で あり , 4 は 係数 行列 と いわ れる . 式 (7.1) ^ 式 (7.3) へ と 進む に 従っ て , "な し , " 付 
き , / 付き で 段階 を 区 別 し た が , これ か ら は , 式 (7.5) を 第 0 段階 と し し て , 上 付き 添字 
(0), (1), …・ を 付け る こと に する . 以後 , 本文 の 説明 で は , ベク トル b を 行列 4 の 第 
十 1 列 ベクトル と し て , 4 を ヵ 行 ヵ 十 1 列 の 行列 に 拡張 し . b も 同じ 式 で 扱え る よう 
に する . そこ で , 前 進 消去 の 第 1 段階 の 操作 は , 第 1 行 に つい て の 























2 0 ( 列 ?= ニ 1. 2,…・,% 十 1) (7.8) 
と , 行 ? 三 2.3.…・,w に つい て の 
9 の 9 29 ( 列 7=1.2… 1) (79 








で ある . 式 (7.2) を 導き 出す と き と 異 な り , 1 行 目 で ① = 1 と な る よう に 変更 し , 2 
行 目 以 下 も プロ グラ ミン グ に 都合 が 良い よう に 変え て ある . この 操作 の 結果 4 は 



































1 1 ll 
10 6 請 … ge 幸 8 
下 1 ll 
0、 | 00 0 0 (7.10) 


1 1 
0.0 0 Ii 0 5g エ 1 
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と な る . 1 < ヵ ぁ < ヵ ー1 と し て , 第 段階 の 操作 は , 行 を に つい て の 


の ニー 7/e 作 リー ( 列 ?= ニ も … な 二 1 (7.11) 
と , 行 ? 三 k 十 1.…・,7 に つい て の 
し ーー 0 の ( 列 三 た , ーッ 7 十 1) (7.12) 


で ある . 最後 の 第 ヵ 段 階 の 操作 は 














amT/oe-D 。 ( 列 3 ニ あす 1 (7.13) 
だ け で ある . 
第 た 段階 の 操作 を 行列 で 表現 する と 
10 00 00 00 …. 0.0 00 
0 0 00 00 QO'00 
1 
00 00 ーー 00 … 00 00 
_⑯- り 
ん た 
。(@-1) 
00 00 一 寺 信 0 … 00 0 
Oo = ce (712) 
4(ー 
00 00 一徹 00 10 … 00 
96 
(&-1) 
2 
00 00 一 共 09 0.0 10 
の 6 
を 使っ て 
4 - O@⑯ 4@- や (7.15) 
































と 表せ る が , この 行列 の 積 を まとも に 行う と 無駄 が 多く , 処理 時 間 が か か る の で , プ 
ログ ラム で は 式 (7.11) と 式 (7.12) に 定義 され て いる 変換 操作 の み を 行う . すべ て の 操 
作 の 結果 4 は 上 三角 行列 




















1 1 1 
10 9 … eg 計 eg 知 m 
ee ② 。② 
4⑨9 = [094=O4= 00 10 | dg 955 和 1 (7.16) 
=1 衝 
00 00 … 10 ga LT 


と な る . 解 を 求め る た め の 後 退 代入 は 
(⑦ め 


2) 計 る る 1 
(7.17) 
pg ー 2 一  。9。 ( 行 ? ニ = ニッ ー1,… ,1) 


7 三 ? 十 1 


で ある . 第 段階 の 式 (7.11) で 。%- り (ピボット ) で 割る 操作 が ある が , それ が 0 で あ 
る 場合 に は 割り 算 が で き な い . その よう な こと を 人 避け る た め に ば か り で な く ., 桁 落ち 
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で 精度 が 下がら な いよ うに する た め に も ゃ , 第 段階 で g%- リ ) ( 行 ? ニ = …,7) の 中 で 
絶対 値 が 最大 の 項 が 第 行 に 来る よう に 行 の 入れ 替え を 行う . 行 の 入れ 替え は , 連立 
方 程 式 の 式 の 順序 を 入れ 替え る こと で ある か ら , 結果 に は 影響 を 与え ない. 一 方 , 列 
に 関し て も 絶対 値 が 最大 の 項 が 第 た 列 に 来る よう に 列 の 入れ 替え を 行う こと も で きる . 
この 場合 は 解 z。 の 順番 に 入れ 替え が 起こ る か ら , その 場合 に は 入れ 替え を 記録 し て 
お き , 最後 に 元 に 戻さ な けれ ば な ら な い . この よう に , 絶対 値 が 最大 な 項 を ピボット 
と し て 使う こと を ピボット の 選択 と いう . 

プロ グラ ム (Gauss_Shoukyohou.java) の メソ ッ ド (gauss_Shoukyohou) と , その 説明 
は 以下 の と お り で ある . ピボット 選択 は 行 の 入れ 替え だ け で 行っ て いる 















































Gauss_Shoukyohou.java の メソ ッ ド (gauss_Shoukyohou) : 





1 pub1ic double[] gauss_Shoukyohou(int n, double[][] a, 
め double[] b) + 

3 doub1e [] x= new doub1e [n] : 

4 doub1e wi: 

5 nt ip= 0: 

6 for (int k=O: k<n: k++) て 

7 w= 0.0: 

8 for (int 1i=k: 1i<n: 1++) て 

9 if (Math.abs(a[i][k]) > ) { 
10 w = Math.abs(a[i] [k] ) : 
11 1p = ュ : 

12 + 

13 + 

14 1f (ip != k) { 

15 for (int ]=k: ]<n: ]++) { 
16 w= a[k] []] : 

17 a[k] 日 ]= a[ip] [] : 

18 alip] 日]= wi 

19 + 
20 w= b[k] : 
21 b[k]= b[ip] : 
22 b[ipl= wi: 
23 か 
24 // 前 進 消去 開始 
%5 doub1e akk= 1.0/a[k] [k] : 
26 double a1k: 
27 for (int ]=k+1: ] く <n: ]++) て 
28 a[k] []]= a[k][]] *akk: 
29 が 
30 b[k] = b[k] *akk: 
31 for (int =k+1: 1<nm: ユ ++) { 
32 aik= a[i] [k] : 
33 for (int ]=k+1: ]<n: j++) て 
34 ali] []] -= aik*a[k] []] : 
35 + 
36 b[i] -= aik*b[k] : 


37 + 
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38 が 
39 for (int i=n-1: 1>=O: iー-) + 
40 Eeene (aiet5 ピ iLS 3mg 2 
41 bi] -= ai][j]*b[]] : 
42 + 
43 x[i] = b[i] : 
44 + 
45 Teturn XX: 
46 + 
1. L1, 2 て 46: メソ ッ ド gauss_Shoukyohou の 定義 で ある . 連立 方 程 式 は @7 ネ の ) 三 6: 


の の F の 6 


で , 戻り 値 は 解 の ベク 


行列 b は 右辺 の 定数 ベク 








L3: 解 の ベク トル x の 配列 で ある . 
L4.5: ピボット の 選択 を する と き に 使う 作業 用 の 変数 で ある . 








L6 て 38: 第 k 段階 の 前 進 


L7 て 23: ピボット の 選 
L8 て 13: 対象 と な る 第 








ニン 








民 を 行う . 
k 列 の 対 角 











ル x で ある . 引数 の n は 係数 行列 as の 次 元 , a は 係数 
ル で ある . 

















前 去 を 行う ルー プ で ある . 














の 行 番号 を jp に 代入 する . 
L14: ピボット が 第 k 行か どう か 調べ る . 
L15 て 22: ピボット が 第 k 行 で な か っ た ら , 第 k 行 と 最大 の 要素 が ある 行 と の 入 
れ 替 え を 行う . プロ グラ ム で は anT1] を b[lk| と し て いる . 

L24: 前 進 消 去 を 始め る . 
L25 へ 30: 第 k 行 に つい て , 式 (7.11) の 処理 を 行う . 

L25: 式 (7.11) で 使う 1/z。 を 変数 akk に 代入 する . 

L27 て 30: 第 k 列 に は 1, 0,…‥ , 0 を 代入 すべ き で ある が , 後に 影響 も 与え な い 
の で , プロ グラ ム 上 で は 第 k 列 の 変更 は せ ず , 第 k+1 列 以降 の 処理 を する 
L31 て 37: 式 (7.12) の 処理 を 行う . 
L38: 前 進 消 友 の ル ー プ の 終わ り . 


















































L39 て 44: 後退 代入 の 式 (7.17) の 処理 . 





L45: 答え の ベク トル を 返す . 


7.1.2 掃き 出し 法 


ガウ ス の 消 




















素 か ら 下 で 絶対 値 が 最大 な 要素 を 選び , そ 






































去 法 で は 前 進 消 去 が 済む と , 係数 行列 の 下 三角 要素 (z』, ? > 7) が すべ 

































































て 0 に な っ て いる が , 上 三角 要素 (z。, ? <7) に 値 は 残っ て いる . そこ で , 解 を 決め る 
た め に は 後退 代入 が 必要 で あっ た . 掃き 出し 法 で は , 各 第 を 段階 の 操作 を , 式 (7.12) 
で 行 ? ニ を 二 1,…・,w に つい て で は な く ? 導 を に つい て 

9 4% りーgAD4 の  ( 列 7= も … 1) (7.18) 
と する の で , 前 進 消 去 が 済む と 対 角 要 素 は すべ て 1, 非 対 角 要素 は すべ て 0 と な る か 


ら , その 時 点 で すべ て の 解 が 求 ま っ て お り ., 後退 代入 の 操作 は いら な い . 図 7.1 ( 左 図 ) 


は ガウ ス の 消 


























の 立体 は 底面 
(底面 積 が ヵ ? 








が 7 ヵ 2 で ,。 gg。 か ら 上 に 伸び る 
で 高 さ が ヵ の 四角 雛 ) で ある . 底 








た 法 の 前 進 消去 の 過程 で 必要 な 要素 の 変換 回 数 を 説明 する 図 で ある . こ 
長 さ ヵ の 垂 線 の 先端 を 頂点 と する 正四 角 雛 












































男 の i 














E 方 形 は 行列 を 表す 正方 形 で あり , 
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図 7.1 ガウ ス の 消去 法 ( 左 図 ) と 掃き 出し 法 ( 右 図 ) に よる 要素 の 変換 回 数 . 底面 は 最初 の 
nx の 行列 で あり , 下 か ら 上 に 第 段階 し な る . ガウ ス の 消去 法 に よる 要素 の 変換 回 数 は , 
1 辺 が ヵ の 正方 氏 と な る の で , ほぼ ?/3 で ある が , 掃き 出し 法 に よる と , 横 に 寝かせ た 三角 
柱 と な る の で , ほぼ 7"/2 と な る . 



























































回 


第 1 段階 の 操作 回 数 は 式 (7.9) か ら わ か る よう に , ほぼ ヵ 2 で ある . 第 段階 の 操作 
数 は 式 (7.12) か ら わ か る よう に , ほぼ ( ヵ ー 紀 2? で あり , 図 で は 下 か ら ょ 段 に ある 正方 
形 に 相当 する . そこ で , ガウ ス の 消去 法 で は 要素 の 変換 回 数 は ほぼ 3/3 回 で ある . 
一 方 , 掃き 出し 法 ( 右 図 ) で 必要 な 要素 の 変換 回 数 は 式 (7.1) か ら わ か る よう に , %?/2 
(底面 積 が ヵ 2 で 高 さ が ヵ の 立方 体 の 半分 ) で ある か ら , ヵ が 大 きい 場合 に は 、 ガウ ス の 
去 法 の ほう が 有利 で ある . 






















































































ニン 











7.1.3 工 U 分 解 











式 (7.6) の 連立 方 程 式 で , 係数 行列 4 が 共通 で , b が 異な る 多数 の 式 を 解く 場合 に 
は , 後に 述べ る 4 の 逆行 列 4-* を 使っ て , x= 4-!b で 解 を 得る こと が で きる が , そ 
れ は 得策 で は な い . ガウ ス の 消去 法 で は , 係数 行列 4 の 下 三角 要素 を 消去 する と き に , 
b に も 同時 に 同じ 操作 を 施し て きた が , ここ で は , 消去 操作 の 手順 を 保存 し て お き , b 
へ の 操作 は 後 で 行う こと に する . さら に , 式 (7.11) や 式 (7.12) 等 の 第 ヵ 段階 の 操作 を 
大 幅 に 変更 する . まず , 第 行 目 は 変化 させ ず , 行 ? ニ た 二 1,…・,% に つい て 処理 
る こと に な る . 第 ? 行 目 の 第 た 列 に つい て は 


0 0 (7.19) 




























































































で あり , 列 7 ニ k 二 1. … , 7 に つい て は 


6 ー 


ae (7.20) 


( 
し が 2k 4) 


と する . この 操作 に よる と , 行列 4 は 
0 0 0 
eg や 12 7 gi の 
1 1 1 
4(? 97 992 9 g9 (7.21) 


2 9 
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と な る . この 行列 4 に 出 て きた 要素 を 使う と 元 の 4 は 
10 00 0.0 人 0 層 
① 
4 こ ニ g5」 1.0 0.0 0.0 g9 g の 9 ー ア の (7.22) 
6 0 1.0 0.0 0.0 AM 
の よう に 下 三 角 行 列 (/) と 上 三角 行列 ( ひ ) の 積 に 分 解 (LU 分 解 ) する こと が で きる . 
この 場合 の 下 三角 行列 (/) は , 行列 4@⑦ の 下 三角 部 分 と 全 対 角 要 素 に 1 を 代入 し た も 
の で あり , 上 三角 行列 ( ひ ) は , 行列 4@ の 上 三角 部 分 と 全 対 角 要 素 を 代入 し た も の で 
ある . そこ で , 
40< メ ニー7O0x=b (7.23) 
と な る か ら , Ox= ッ と 置い て , 
Ox= ニ 7y=b (7.24) 














と する こと が で きる . まず , 7y ッ =ーb か ら , y を 求め る に は , 各 b に つい て も , 4 に つ 


いて 行っ た 消去 法 の 操作 














り / 放 | 


? 一 1 
1 


を 行う こと に な る . 続け て Ux= ッ か ら x を 求め る に は , 式 (7.17) の 後 


(7.25) 


退 代入 の 操作 


プロ グラ ム (LU_Bunkai.java) の メソ ッ ド (lu_Bunkai) と , その 説明 は 以下 の と お り 
で ある . ピボット 選択 を 列 に つい て も 行っ て いる . 


LU_Bunkai.java の メソ ッ ド (lu_Bunkai) : 


由 

ウ int m, double[][] b) t 

3 doub1e [] [] x= new doub1e [n] [m] : 
4 int[] ipiv= new int[n] : 

5 doub]e[] winv= new doub1e [n] : 

6 1nt 1D, 1DW, 1W: 

7 doub]1e wi: 

8 for (int k=O: k<n: ミ ++) て 

9 1piv[k]= k: 

10 w= 0.0: 

il for (int i=0: i<n: i++) 

12 if (Math.abs(alk] Hi]) > ゞ ) + 
13 y = Math.abs(a[k] [ ュ ] ) : 

14 『 

宙 $ winv[k] = 1/y: 

16 + 

17 # 


pub1ic doub1e[][] 1u_Bunkai(int n, double[][] a, 
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18 for (int k=0: k<n: k++) て 
19 w= 0.0: 
20 ip= 0: 
21 for (int 1i=k: 1<n: 1++) て 
22 1pw= 1piv[i] , 
23 if (Math.abs(alipw] [k] )*winv[ipw] > yv) て 
24 w = Math.abs(a[ipw」 [k] )*winv [ipw] : 
25 ョ ゅ =ー 
26 由 
27 + 
28 ipw= ipiv[ip] : 
29 if (ip != k) { 
30 pivlip]= ipiv[k] : 
31 ipiv lk]= ipw: 
32 + 
BS doub1e aipvwk= 1.0/a[ipw] [k] : 
34 doub1e aipk: 
35 for (int =k+1: 1<n: ユ ++) { 
36 1p= ipiv[i] : 
37 a [ip] [k] *= aipwk: 
38 aipk= alip] [k] : 
39 for (int ]=k+1: ]<n: j++) て 
40 a [ip] []] -= aipk*a[ipw] []] : 
41 上 
42 + 
43 了 
44 for (int k=O: k<m: k++) て 
45 for (int =0: 1<n: ユ ++) て 
46 1p= ipiv[i] : 
47 w= b[ip] [k] : 
48 for ( int ]=0: <1: j++) t 
49 w -= alip]l[]]*x[]] [k] : 
50 + 
51 x[i] [k]= wi: 
52 + 
53 for (int 1=n-1: 1>=O: ー-) 
54 w= [li] [k] : 
55 1p= ipiv[i] , 
56 for ( int ]= ュ +1: ] く <n: j++) て 
57 w -= alip] []] *x[]] [k] : 
58 + 
59 xli] [k]= w/alip] [i] : 
60 # 
61 
62 return X: 
63 + 
1. L1, 2 て 63: メソ ッ ド lu_Bunkai の 定義 で ある . 多重 連立 方 程 式 は *z み = 














で , 戻り 値 は 解 の 行列 x で ある . 引数 の n は 係数 行列 a の 次 元 , a は 係数 行列 , 


m は 右辺 の 定数 行列 b の 列 の 数 で あり , 係数 行 多 を as と する 周 





『 立 方程式 の 数 で 
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ある . b は 右辺 の 定数 行列 で ある 











2. L3: x は 解 の 行列 で ある . 

3. L4: ピボット 入れ 替え を 記録 し て お く た め に 列 番 号 を 代入 する 配列 で ある . 

4. L5: ピボット の 要素 の 逆数 を 代入 し て お く 配 列 で ある 

5. L8 て 17: 各行 ご と に 絶対 値 が 最大 の 要素 を 探し . その 逆数 を 配列 winv に 代入 
する . 

6. L18 て 43: 一 番外 側 の ルー プ で あり , 第 k 段階 に 関す る ルー プ を まわ す . 

7. L19 へ て 32: ピボット 選択 を 行う . 

8. L33 て 42: 式 (7.19) と 式 (7.20) の 処理 を 行う . 

9. L43: L18 か ら の ルー プ の 終わ り で , LU 分 解 が 済ん で いる . ピボット 選択 を 使っ 


て いる か ら , 順番 が 入れ 替わっ て いる が , その こと も 考慮 すれ ば , 配列 A の 下 
三角 の 部 分 に は L が あり , 対 角 要 素 と 上 三角 部 分 に は U が ある . 

10. L44 で 61: b の 列 に 関す る ルー プ で ある . 

11. L45 へ 52: 式 (7.25) の 処理 を 行う . 

12. L53 て 60: 式 (7.17) の 後退 代入 の 処理 を 行う 

13. L61: b の 列 に 関す る ルー プ の 終了 . 

14. L62: 答え の ベク トル を 返す . 
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連立 1 次 方 程 式 の 解法 に は , 以上 述べ た 方 法 の ほか に , クラ マー の 公式 が ある . こ 
れ は 数 式 と し て は 簡潔 で 美しい が , 計算 プロ グラ ム で の ステ ッ プ 数 が ( ヵ 二 1) ヵ ! で あ 
る か ら 消 去 法 の 3/3 と 比較 する と , 次 元 数 ヵ が 大 きい 場合 に は 圧倒 的 に 効率 が 悪い . 
し か し , 次 元 数 が 2, 3 の 場合 に は 役に立ち , 筆算 で も 使わ れる . 実際 , 式 (3.3) の 導出 
に ゃ も 使わ れ て いる . 





























7.2.1 クラ マー の 公記 





ヵ 元 連立 1 次 方 程 式 は 式 (7.6) で ある . 行列 4 の 行列 式 











11 の 12 の 1 ヵ 
det |4| = 21 0 の 22 2 (7.26) 
3 ヵ 1 7 ヵ 2 127772) 
を 使う と , 連立 方 程 式 の 解 は , 
det |4:| 
s 一 7.27 
det|| (7.27) 


で ある . 分 子 の det|4,| は 係数 行列 4 の 第 ? 列 と , 連立 方 程 式 の 右辺 の ベク トル b と 
を 入れ 奉 え た 行列 の 行列 式 








第 7 章 連立 1 次 方 程 式 の 解法 


@11 912 1 の 1 ヵ 
21 0 っ 2 65 2z 

det |4,| = (7.28) 
の ヵ 1 7 ヵ 2 6』 7 ヵ 


で ある . 

ここ で 気が付く こと は , 式 (7.27) の 分 母 で ある 式 (7.26) の 値 が ゼロ に な る と , 解 を 
求め られ な いこ と で ある . この よう に 係数 行列 の 行列 式 が ゼロ に な る と , 消去 法 や 掃 
き 出 し 法 に お いて は , 計算 の 途中 で ピボット 選択 を し て も ピボット が ゼロ に な っ て し 
まい , 計算 が で き な く な っ て し まう . 一 般 的 に , 行列 式 の 値 が ゼロ で な い 行 列 を 正則 
行列 と いう . また , 正則 行列 に は 逆行 列 が 存在 する 

















7.2.2 行列 式 の 値 
(2 x 2) 型 の 行列 の 行列 式 は 


@11 の 12 


det 4 イー 三 の 11@22 一 の 21012 (7.29) 








21 0 の 22 


で あり , (3 x3) 型 の 行列 の 行列 式 は 


@11 。 d12 13 
det 4 ニ 21 022 023 


G31  G32 0G33 
三 G1122033 十 G31G12023 十 G21032013 一 G11032023 一 G31G22G13 一 21012033 
(7.30) 


で ある . そし て , ( ヵ x ヵ ) 型 の 行列 の 行列 式 の 一 般 的 な 定義 は 


det 4 = > し (22, ) 2 110752 の 7 (7.31) 
( カ , 5, …) な) 
で ある . ここ で 使わ れ た 関数 z( 二 , あ ,… , 訪 ) は , (1, 2, … , ヵ ) の 順列 の 一 つ で ある 
( れ , 725, 7) に つい て 」。 (5) あ ) が (1, 2 …| , 7) か ら 偶数 回 の 互換 に よっ 
て 作ら れる な ら o( 生 , 旋 ,… , 旋 ) ニ 1 で あり , 奇数 回 の 互換 に よっ て 作ら れる な ら 
g( れ , 75 , ) ニー1 で ある . また , ゞ ) で 表 さ れる 和 は , すべ て の 順列 ( 作 , あ , …, 
旋 ) に つい て 加え る こと を 意味 し て いる . 
(2 x 2) 型 の 行列 は 2 本 の 列 ( 縦 ) ベ クト ル あ る い は 行 ( 横 ) ベク トル か ら で き て いる 
と 見 る こと が 可能 で ある が , 紙面 の 都合 上 , 行 ベ スク トル の ほう を 使う こと と する . 行 
列 式 は 2 本 の ベク トル の 張る 平行 四辺 形 の 面積 







































































det 4=laillas| sin 9 (7.32) 


等しい. ここ で 6 は , ベク トル ai = (q1i, G12) か ら ベ クト ル 85 三 (G。1, G22) まで の 
角度 で あり , z, ヶ 面 上 で 反 時 計 回 り を 正 と する . 
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鐘 7.2 ( 左 図 ) は 行 ベ クト ル を ai = (qi, gr2), as 三 (gs1, go>) と し た 行列 ( 31 ) 


32 

の 行列 式 の 図 で ある . 平行 四辺 形 の 面積 が 式 (7.29) 、 すなわち, 破線 の 短 形 か ら 点 線 

の 知 形 を 引い た も の に 等 し いこ と は , この 図 に も う 少 し 補助 線 を 加え て 平面 可 何 の 問 

題 と し て 考え れ ば 理解 で きる . 
(3 x 3) 型 の 行列 の 場合 は 3 本 の ベク トル の 張る 平行 六面体 の 体積 に 等 し い . た 

だ し , ベク トル の 張る 順番 に よっ て は 負 の 値 と な る . 図 7.2( 右 図 ) は 行 ベ クト ル を 






































































































































ai 三 (q], 2, G1s)。 az 三 (G2, 22, 23)、 as 三 (gsi, gs2, 9ss) と し た 行列 ) の 
a3 

行列 式 の 図 で ある . 平行 六面体 の 体積 が 式 (7.30) に 等 し いこ と は , (2 x 2) 型 の 場 
合 ほ ど 簡 単 で は な い . 原点 で 座標 軸 の 回 転 を 行っ て も 3 本 の ベク トル の 相互 の 関係 
は 不変 な の で , 体積 は 変わ ら な いか ら 座 標 軸 の 回 転 を 使う . 2 本 の ベク トル ョ a」 = 
(1, 9 G13), az 三 (951, Go5, Go3) を 含む 面 上 に 新しい 7 軸 を と り , その 面 に 垂 
に 2 軸 を と る . する と , 平行 六面体 の 体積 は 底面 の 平行 四辺 形 (122。 - 1。) に 
ベク トル aa の 成分 %。 を 掛け た も の に な る か ら , 式 (7.30) の gg5。g4。 一 の 1 の 233 
に 等 し く な る . そし て , 残り の 4 項 は ゼロ と な っ て いる か ら , 式 (7.30) は 平行 六面体 
の 体積 で ある . 
一 般 的 に , ( ヵ x ヵ ) 行列 の 行列 式 の 値 は , ヵ 次 元 空間 で ヵ 本 の ベク トル ai, az, …, 
a,。 の 張る 超 平 行 面 立 体 の 体積 し な る . そこ で , も し ゅ 本 の ベク トル が ヵ 次 元 空間 を 
張ら ず , ヵ ー1 次 元 以下 の 空間 に 収まっ て し まう と , ヵ 次 元 空間 で の 体積 は せ ロ に な っ 
て し まい , 行列 式 の 値 も ゼロ で ある . ちな み に , ヵ 本 の ベク トル の 張る 空間 が ヵ 次 元 
の 場合 に は , その 行列 の ラン ク ( 位 ) は 。 で ある と いう . また , ( ヵ x?) 行列 の ラン ク 
が 5 の 場合 に は , どの ベク トル も 他 の ベク トル の 1 次 結合 で は 表せ な いか ら , ベク ト 
ル は 互い に 1 次 独立 で ある と いい , ヵ 未 満 の 場合 に は 1 次 従属 で ある と いう . 

行列 式 を 求め る プロ グラ ム に 関係 し て 必要 な 行列 式 の 性 質 を 次 に 述べ る . 行 と いう 
文字 を 使う が すべ て を 列 と いう 文字 に 置き 換え て も 成り 立つ . 直感 的 に 理解 する た 
め に (3x3) 型 の 図 で 説明 する . これ ら の 証明 は , も ちろ ん 式 (7.31) を 使っ て , 一 般 
的 に 行う こと が で きる . 

























































































































































































図 7.2 32 行 2 列 の 行列 ( 左 図 ) と 3 行 3 列 の 行列 ( 右 図 ) の 行列 式 の 値 と な る 平行 四辺 形 と 平行 六面体. 
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1) ある 二 つ の 行 同士 の 入れ 替え を する と, 体積 (行列 式 の 値 ) の 符号 が 変わ る . 

2) 7 行 が ? 行 に 等 し か っ た ら (1) に より , ある い は 厚み が な い の で , 体積 (行列 
式 の 値 ) は ゼロ で ある . 

3) ある 行 に 数 c を 掛け る と ベク トル の 長 さ が c 倍 に な る か ら , 体積 (行列 式 の 
値 ) は c 倍 に な る . 

4) ある 行 に 他 の 行 の g 倍 を 加え て も , 体積 (行列 式 の 値 ) は 変わ ら な い . 





























そこ で , 行列 式 の 値 を 求め る 行列 に , 連立 方 程 式 の 係数 行列 と 同じ 消去 法 を 適用 
する こと が で きる が , 次 の こと に 注意 し て お く 必 要 が ある . ピボット の 入れ 奉 え が 
あっ た ら , (1) に よら 行列 式 の 値 の 符号 を 反転 する . 式 (7.11) に よる と , 各 ょ 段階 で 
ピボット 行 が g%- り で 割ら れ て 対 角 要 素 は 1 に な っ て いる か ら , (3) に より , 最後 に 
ge- り を 掛け な けれ ば な ら な い . また , 他 の ? 行 に は ピボット 行 の 。⑦ リ 倍 し た も の 
が 足 さ れ て いる が , (4) に より , その 影響 は せ ぜ ロ で ある . 最後 の 行列 の 行列 式 の 値 は 1 
と な る か ら , 元 の 行列 式 の 値 は 各 段 階 で 割り 算 に 使っ た ピボット に の すべ て を 1 
に 掛け れ ば よく , それ は 





























det|4|=11| < 計 / (7.33) 
なー 
で ある . 
プロ グラ ム (LU_Gyouretsushiki.java) の メソ ッ ド (ln_Gyouretsushiki) は プロ グラ ム 
(LU_Bunkai.java) の メソ ッ ド (lu_Bunkai) と LU 分 解 の 部 分 は 共通 で あり , 式 (7.33) の 
操作 が 追加 され て いる だ け で ある . その 部 分 と 説明 は 以下 の と お り で ある . 





























LU_Gyouretsushiki.java の メソ ッ ド (lu_Gyouretsushiki) の 一 部 : 


1 pub1ic doub1e 1u_Gyouretsushiki(int n, doub1e[] [] a) { 
2 doub]e det= 1.0: 

3 int [] ipiv= new int[n] : 

4 中 賠 

5 if (ip != k) 【 

6 ipiv[ip]= ipivlk] : 

7 ipiv[k]= ipw: 

8 det= -det: 

9 + 
10 double aipwk= 1.0/a[ipw」 [k] : 
il det /= aipVvk: 
12 doub1e aipk: 
13 中 略 
14 return det: 
15 


1. L1 へ 15: メソ ッ ド ln_Gyouretsushiki の 定義 で ある . プロ グラ ム (LU_Bunkai. 
java) の メソ ッ ド (lu_Bunkai) と ほとん ど 同 じ で ある . メソ ッ ド (lu_Bunkai) の 
L1 て 3 と 入れ 鞭 わ っ て いる . 引数 の n は 行列 a の 次 元 。、 a は 行列 式 の 値 を 求め 
る 配列 で ある . 
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L2: 行列 式 の 値 の 計算 の た め の 変 数 qet の 初期 化 . 

L5 て 9: ピボット の 入れ 替え が あっ た ら , 符号 を 反転 する . 
L10 て 12: 対 角 要 素 を 掛け る . 

L14: det の 値 を 返し て いる . 





ot PR 2 





7.3 逆行 列 














掃き 出し 法 で 前 進 消 到 が 済む と , 元 の 係数 行列 4 は 単位 行列 に な る . 式 (7.16) 
は 消去 法 の 変換 操作 で ある か ら , 掃き 出し 法 の 変換 操作 と は 少し 異な る が , 掃き 曲 
法 の 変換 操作 〇 を 使え ば , 


4 ニ O4=7 (7.34) 
































上 


S 
3 














と な る . この 変換 操作 O の 行列 を 作れ ば , それ が まさ に 逆行 列 で ある が , この 方 法 で 
その まま 計算 する こと は 効率 が 良く な い の で , 掃き 出し 法 が ある わけ で あり , それ を 
使う こと に な る . そこ で , O を 掃き 出し 法 の 変換 操作 と し て 単位 行列 に 作用 させ る た 
め に , 同じ 過程 を 単位 行列 に 施せ ば , 



































O7=O (7.35) 


と な る . する と , 行列 O. すなわち 4 の 逆行 列 が 得 ら れる . 式 (7.6) で ベク トル x と 
右辺 の ベク トル b を (7 ヵ x?) の 行列 に 拡張 し て 行列 5 を 単位 行列 に こす る こと に な る . 
そこ で , 行列 4 の ( ヵ x2z) 行列 の ほか に , ( ヵ x ヵ ) の 単位 行列 を p り と し て , メソ ッ 
ド lu Bunkai を 呼べ ば 戻り 値 が 逆行 列 と な っ て いる . 
プロ グラ ム (LU_GyakugyouretsuTest.java) の メソ ッ ド (main) の 一 部 と , その 説明 は 
以下 の と お り で ある . 














LU_GyakugyouretsuTest.java の メソ ッ ド (main) の 一 部 : 


1 public static void main(String args[] )+ 
タ double[] [] a= 人 {1, 4, 3}, {2 5, 4}, {1, -3, -2}}: 
3 doub1e[] [] = 人 1,.0,0}, 10,1,0}, {0,0,1}}: 
4 nt n= a.1ength: 
5 doub1e [] [] x= new doub1e [n] [n] : 
6 中略 
LU_Bunkai gs= new LU_Bunkai () : 
8 x ニ = g8.1u_Bunkai(n, a, n, 1): 

9 中略 
10 + 

1. L1 て 10: メソ ッ ド main の 定義 で ある . 

2. L2 ぐ 5: a は 逆行 列 を 求め る 元 の 行列 i は 単位 行列 x は 逆行 列 を 代入 する 行列 

で ある . 
3. L7: LU_Bunkai 型 の イン スタ ンス を 作る . 
4. L8: 多重 連立 方 程 式 を 解い て , 逆行 列 を 求め る . 
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演 壮 問題 











7.1| 次 の 連立 方 程 式 を 解き な さい . 














2Z 十 9 十 々 ニー1 
ヶ 十 2/ 十 々 ヶ ニー2 
十 り 9 十 2z ヶ ニー2 


答 : ニー0.25、 ッ ニー0.75, タニ ー0.75 





7.2] 次 の 行列 式 の 値 を 求め な さい . 











1 3 2 1 
2 0 一 2 
ー1 5 1 1 
2 7 --6 3 


第 章 
関数 近似 と 平 消化 











8.1 








実験 値 に は 多かれ 少な か れ 誤 差 が 含ま れる か ら , 実験 を 繰り 返す た びに 少し ずつ 異 
な っ た 値 が 得 ら れる . そこ で , 最も 確か らし い 値 ( 最 確 値 ) を 決定 する こと が 必要 に な 
る . 変数 > に 対し て , デー タ 量 ヶ が 得 ら れる と き , > と ヶ の 関係 y(z) が , 何 か あ る 関 
数 の 形 に な る こと が わか っ て いる と き に は , その 関数 の パラ メー タ を 決め れ ば よい こ 
と に な る . その パラ メー タ を 決め る 方 法 に 最小 二乗 法 と いう 方 法 が ある . 一 方 , 関数 
型 が わか ら な い 場 合 に は , すべ て の デー タ 点 > に つい て , その 近傍 の 数 点 の 値 の 平均 
を と る な ど し て , デー タ の ば ら つ き を 滑ら か に する 平滑 化 (smoothing) を する こと に 
な る . 

数 値 計 算 に お いて , その 関数 型 が 解析 的 に わか っ て いる けれ ども , 複雑 すぎ て 変数 
ヶ が 変わ る た びに 毎回 計算 する わけ に いか な いよ うな 場合 に は , チェ ビシ ェ フ 近似 が 
役に立つ . それ は , 多項式 近似 が で きる 場合 で あり , ヵ 次 の 多項式 P。(z) で 近似 する 
な ら , ヵ 十 1 次 の チェ ビシ ェ フ 多項式 の ゼロ 点 を デー タ 点 (標本 点 ) と し て , 元 と な る 
複雑 な 関数 の 値 を 計算 し て お け ば よい . 一 方 , 存在 する デー タ 点 の すべ て を 使っ て 
多項式 な ど を 作る の で は な く , 計算 する 点 ヶ の 周り の 数 個 の デー タ 点 だ け を 局所 的 
に 使う 方 法 と し て . スプ ライ ン 関 数 や , 2 次 元 曲 面 の 場合 の ベジ ェ 曲 面 な ど が ある . 
第 3 章 で 述べ た ラグ ラン ジュ の 補間 法 な ども , 関数 近似 の 中 に 入れ る こと が で きる で 
あろ う . 



































































































































最小 一 乗法 




















ある 量 > の 値 を ヵ 回 繰り 返し 求め た ら , zi, z2,…・,z。 で あっ た . 真 の 値 は わか ら 
の 発生 が まっ た く 偶 然 で も や る と する と , その 分 布 は 通常 。 正規 分 布 






























































Az2 


(2z)-#e- 党 (8.1) 








と な る の で , ヵ 回 で の 差 が Az」, Az。, | , Az。 と な る 確率 は 正規 分 布 関数 の , 




















(An, Az, … , Az。) = (2r) すっ (AciTA2 キ ー オ Az)72 (8.2) 
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で ある . 最 確 値 は . この 確率 を 最も 大 きく する 値 で ある か ら , 式 (8.2) の 指数 部 5 = 
Ag 二 Az2 二 … 十 Az2 を 最小 に する こと か ら 求 め ら れる . すなわち , 


9 ニーAf 二 Az2 十 … 十 Az ニ が (9 ー zn)* (8.3) 


4? 一 1 








の 未知 数 zo で の 微分 が ゼロ , 
- 2 っ ei (8.4) 
で ある . これ か ら , 
zo ニニ う 、a 85) 


と な る . 5 は 最 確 値 と 各 デ ー タ 値 と の 差 の 2 乗 の 和 で ある か ら , この 最 確 値 の 求め 方 
は 最小 二乗 法 と いわ れ , この 場合 に は 最 確 値 は 算術 平均 値 で ある . 


























8.1.1 1 個 の 変数 に 対し て 線形 関係 が ある 場合 


ある 量 > の 値 に 対し 測定 値 め が z と 線形 関係 に ある こと が わか っ て いる 場合 に は , 


9(Z) ニ gZ 十 0 (8.6) 





の 係数 々 と ぁ を 決め る こと に な る . ぁ 回 の 測定 デー タ の 組 を {(z」, 久 ) (5, の) 
(z。, 。)) と する . この 場合 に は , z の 値 に は 曖昧 さ が な く の 値 に の み ば ら つ き が あ 
る と 考え る の で , 2 乗 和 は 














S 三 0 ー(gz 十 の} (8.7) 





と な る . 最小 二乗 法 で は 未知 数 々 と ゥ に よる 式 (8.7) の 偏 微分 が 0 と な る こと か ら 求 め 
る の で , そこ で , 
29 。 99_ 
Oo ” 65 
より , 
2 (si 填 z め 一 zz の 0, 0 十 5 一 統 } テ 0 (8.9) 


?% 王 1 ? 王 1 
と な る . これ は 整理 する と , 未知 数 , 5 に 対す る 連立 方 程 式 
ze+ kl5=z 引 lg+ 還 5= 軌 (8.10) 


で ある . ここ で , 
〆^] 三 2 し | アプ もら |z| = うー 2 學 
2 % ニ 1 2 ニ 1 
則 己 和 軌 区 2 
2 ニ 1 


? 王 1 


(8.11) 





8.1 最小 二乗 法 
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を 使っ た . 式 (8.10) は 未知 数 。 と ぁ 5 に 関す る 連立 方 程 式 で ある か ら , それ を 解く と , 


_ el 一 較 。 人 則 - glz 
plz 一 plz 





が 決ま る . 

















(8.12) 


鐘 8.1 は [0, 9.5] で 等 間隔 な 20 点 の > の 値 に 対す る ヶ の 値 を =0.9z 十 1.0+e で 作っ 


た 20 組 の デー タ に つい て , 最小 二乗 法 で 求め た 1 次 式 の グラ フ で ある . ec は o=0.9 の 








その 説明 は 以下 の と お り で ある . 


Saishou_Jijou_Hou.java の メソ ッ ド (saishou_Jijou_Hou) : 


1 


( 〇 OO の 中 の いい 


は は は は は は 
心 の O D り は の 


pub1ic double[] saishou_Ji]jou_Hou(int m, int n, double[] [] x, 


double[] y){ 
doub]e[] [] a = ne doub1e [m] [m] : 
double[] b = ne doubl1e [m] : 
doub1e[] p = new double [m] : 
doub]e 8: 
for (int i=0: 1<m: ++) 
for (int ]=0: <= ュ 1: ]++) て 
8= 0.0: 
for (int k=0: k<n: k++) 
8 += x[k] [1i]*x[k][]] : 


# 
ai] ]= a[j] [1]= si: 
+ 
が 
for (int i=0: 1<m: ++) 
8= 0.0: 


for (int k=0: k<n: k++) 
S += x[k] [i]*y[k] : 
+ 

b[i]= sj 





0 10 x 





8.1 線形 関係 の ある デー タ の 最小 二乗 法 に よる 1 次 式 の 決定 . o 印 は , [0, 9.5] で 等 間 


隔 な 20 点 の 





の 値 に 対す る ヶ の 値 を り ゅ =0.9z 十 1.0 十 e で 作っ た 20 組 の デー タ で あり , 直 


線 は 最小 二乗 法 で 決定 し た 1 次 式 で ある . ec は =0.9 の 正規 分 布 乱数 で ある . この 場合 は , 
g 三 0.89.5=1.32 で ある . (Z08_-01.8aishou_Jijou_Hou.java) 





正規 分 布 乱数 で ある . プロ グラ ム (Saishou_Jjijou_Hou.java) の メソ ッ ド (saishou_jjou 
_Hou) と , 
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め 省 了 

22 Gauss_Shoukyohou gs= new Gauss_Shoukyohou() : 
23 p= gs.gauss_Shoukyohou(m,a,D) : 

24 中 略 

25 return DP: 

26 } 











1. L1 へ 26: メソ ッ ド saishou_Jijou_Hou の 定義 で ある . 引数 の m は 自由 度 で 近似 
方 程 式 の 係数 の 数 , n は デー タ の 組 数 で ある . x は デー タ の 配列 で あり , 第 1 添 
字 は デー タ の 組 数 n、 第 2 添字 は 自由 度 m で ある . y は 関数 値 の 配列 で 添字 は 
デー タ の 組 数 nm で ある . 戻り 値 は 近似 方 程 式 の 係数 の 配列 で ある 

L2: 近似 方 程 式 の 係数 を 求め る た め の , 連立 方 程 式 の 係数 行列 で ある . 

L3: 連立 方 程 式 の 右辺 の 定数 配列 で ある . 

L4: 近似 方 程 式 の 係数 を 代入 する 配列 で ある . 

L6 て 14: 式 (8.11) に より , 連立 方 程 式 の 係数 行列 を 作成 する 

L15 て 21: 式 (8.11) に より , 連立 方 程 式 の 右辺 の 定数 を 作成 する 

L22: Gauss_Shoukyohou クラ ス の イン スタ ンス を 作る . 

L23: 連立 方 程 式 を 解く . 

L25: 近似 方 程 式 の 係数 を 戻り 値 と し て 返す . 





















































9 99 の 師 下 軸 ) 因 


8.1.2 変数 が 2 個 以上 ある 場合 





変数 と し て z, ヶ の 2 個 が ある 場合 に は , 最適 関数 











2(Z, の 三 gw 十 の 十 c (8.13) 


の 係数 z, bc を 決め る こと に な る . 1 回 の 測定 で 求め られ る 量 は >,9, z の 3 量 (自由 
度 が 3) で ある か ら , ヵ 回 の 測定 デー タ の 組 は {(z1, 婦 , zn) (25, の 。 22) (2。。 の, 
z%)) と な る . 係数 g,c は 最小 二乗 法 に よる と , 




















9 = ニ と ー(gz: 十 0 二 9]) (8.14) 


の g, あ c に よる 偏 微分 が それ ぞ れ 0 と な る こと か ら 得 られ る 連立 方 程 式 , 
[z7]g+ [zi zlc = y] 
[zglg 人 ]5 二 軌 c = |] (8.15) 
lzlg 二 5 二 He テト 





を 解い て 求め られ る . 
より 一 般 的 に , 変数 が 礼 個 で 自由 度 が 祥 十 1 の 場合 に は , 最適 関数 








9(z0 の) ニ > し gz 」 gm (8.16) 


4 一 1 
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の o⑦ (6 ニ 1,…・, 7z 十 1) を 決め な けれ ば な ら な い . この 場合 の 連立 方 程 式 は , 


[z⑦z]g⑦ [yz]g( の 9 9 (7 =1, … , 7 


ト : 


交 
| 
選 


(8.17) 
ME だ EICuug/E 暫 7 


[の 


敵 
| 
選 


と な る . 


8.1.3 変数 の 2 次 式 の 場合 





ァ の 2 次 式 の 場合 に は , 最適 関数 は (>) = zz? 十 0y と c で ある か ら 自 由 度 は 3 で あ 
り , 式 (8.15) に お いて , ? ヶ 一 z2、 ター ァ . タ ヶ ター タッ の 置き 換え を すれ ば よく , 連立 方 程 


式 は 














ze lz26 二 ylc = z 久 
[z"lg+ yz 邊 5 le = [Ez (8.18) 
lz7]e 二 lg6+ lc= 陣 








で ある . 

包 8.2 は [-1, 1] で 等 間隔 な 41 点 の z の 値 に 対す る の 値 を りーz? 十 z 十 1.0 十 e 
で 作っ た 41 組 の デー タ に つい て , 最小 二乗 法 で 求め た 2 次 式 の グラ フ で ある . ec は 
ヶ 三 0.1 の 正規 分 布 乱数 で ある . 
































8.2 2 次 式 の 関係 が ある デー タ の 最小 二乗 法 に よる 2 次 式 の 決定 . o 印 は , [-1, 1] で 等 
間隔 な 41 点 の z の 値 に 対す る の 値 を ッ ーz2 十 z 十 1.0 二 ce で 作っ た 41 組 の デー タ で あり , 
実線 は 最小 二乗 法 で 決定 し た 2 次 式 で ある . ge は =0.1 の 正規 分 布 乱数 で ある . この 場合 は , 
0.948z? 十 0.035z 十 0.012 で ある . (Z08_.02_SJH_2jishiki.java) 
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チェ ビシ ェ ノ 多項式 近似 





チェ ビシ ェ フ 多項式 77,(z) の 重要 な 特性 は 次 の と お り で ある . いま , 区 間 -1 < ヵ ヶ < 
1 で 関数 7(z) 0( 恒 等 的 に ゼロ ) を 最高 次 の 係数 が 1 で ある ヵ 次 多項式 で 近似 する 場 
合 に は , その 最良 近似 は 7x) で 与え られ る . 
チェ ビシ ェ フ 多項式 の 定義 は 




















7,(Z) 三 cos(72 co8 の) 


(8.19) 
三 cos(26) た だ し cos9= ァ 





で ある . そこ で , 7( 々 ) = 0 を 満た す 条 件 は 9 = ( ょ ー す )z( ょ ー1.2,… ,n) で ある 
か ら , >ー ァ zz 三 cos{(2 た 一 1)7/27) の と き で ある . この ヵ 個 の 点 で は 衝 (z) = 0 で あ 
る か ら , げ (z) 三 0 の 関数 と 一 致し て いる . 関数 /(z) = 0 の 近似 と し て 最も 大 き な 誤 
差 は 7。(z) = 土 1 で あり , それ は 7? ヵ 9=Ar (た =0,1,…・, np) の と き で ある か ら , = 


COS ん 旭 











の と き と な る . そこ で , 多項式 近似 が で きる よう な 一 般 的 な 関数 7(z) を 


次 の 多項式 。(z) で 近似 する と き に は , 標本 点 と し て , 1(Z) =0 と な る ( ヵ 二 1) 
個 の 点 z。 を 用 いる こと に する . ヵ 次 の 多項式 


祥 。 三 





(る ) 三 人 ei" (8.20) 











の ヵ 二 1 個 の 係数 c。 は . その ヵ 十 1 個 の 点 で 2(z,/) を で きる だ け 正 確 に 求め 、 ヵ 1 個 
の 標本 点 で 成り 立つ 関係 式 の 連立 1 次 方 程 式 を 解く こと に よっ て 決定 する こと が で き 
る . この 近似 多項式 の 誤差 の 目安 と する た め に は , 7。i(z) ニモ 1 と な る ヵ 十 2 個 の z。 
点 に お いて , (zz) と 。(zz) の 差 を 求め れ ば よい . 

チェ ビシ ェ フ 近似 の 要点 は , 次 の と お り で ある . ヵ 次 の 近似 多項式 を 作る と き に は , 
最低 ヵ + 1 個 の 異な っ た 標本 点 が 必要 で ある が 、 その 点 の と り 方 は まっ た く 任 意 で あ 
る . た だ 一 般 的 に いう と , 点 を 細か く と っ た 部 分 は 近似 が 良く , 粗く と っ た 部 分 は 悪 
く な る . そこ で , 点 を 等 間隔 に と っ て も よい で あろ う が , 外側 に 標本 点 が な い 両 端 の 
部 分 で 近似 が 悪く な っ て し まう の で , チェ ビシ ェ フ 近似 で は 両端 に 近づく ほど 点 の 間 
隔 が 細か く な り , 精度 が 均一 に な る よう に な っ て いる . 
包 8.3 は 1 周期 の 三角 関数 の , 3 て 6 次 式 ま で の チェ ビシ ェ フ 多項式 で の 近似 を 示す 
も の で ある . 3 次 式 か ら 6 次 式 に 進む に 従っ て 近似 が 良く な り , 図 に 使う 程度 で あっ 
た ら , 6 次 式 で 十分 精度 が ある と いえ よう . 表 8.1 は 図 8.3 に マー ク で 示し た 近似 値 の 
誤差 を 数 値 で 直す も の で ある . z は 座標 値 で あり , Aw は 誤差 で ある . 3 て 6 次 式 と も , 
偶数 番目 の 点 は 標本 点 で ある か ら 誤 差 は 小さ く 計算機 の 精度 程度 で ある . 奇数 番目 の 
点 は 近似 誤差 が 極大 に な る 点 で あり , 3 次 式 で は か な り 大 きい が , 4 次 式 , 5 次 式 , 6 
次 式 へ と 進む に つれ て 精度 が 良く な っ て いる . 実際 に 使う と き は , 必要 と する 精度 が 
出る まで 次 数 を 上 げ て 試す 必要 が ある . また , > の 範囲 が 広い と き に は 区 間 を 分 け て ., 
近似 式 を 別々 に 作る ほう が 計算 時 間 を 少な くす る こと が で きる . 
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図 8.3 三角 関数 の チェ ビシ ェ フ 多項式 に よる 近似 . 曲線 は 正確 な グラ フ で あり , マー ク が 近 
似 値 で ある . 実線 と + 印 は 3 次 式 , 点線 と * 印 は 4 次 式 , 破線 と o 印 は 5 次 式 , 一 点 鎖線 と 
x 印 は 6 次 式 に よる 近似 の 様子 で ある . ヵ 次 式 の 場合 に は , 印 は (2 十 3) 個 あ る . 標本 点 は 
十 1 点 あ り , それ ぞ れ 左 か ら 偶数 番目 の 点 が 該当 し , 誤差 は な い . 両端 を 含め た 奇数 番目 の 
点 は , 近似 誤差 が 極大 に な る 点 で あり ヵ 十 2 点 あ る . (Z08_03.tchebycheff.java) 































































































表 8.1 三角 関数 の チェ ビシ ェ フ 多項式 に よる 近似 精度 . それぞれ 偶数 番目 の 点 は 標本 点 
で ある か ら 丸 め 誤差 だ け で あり , 奇数 番目 の 点 は 近似 誤差 が 極大 に な る 点 で ある . (Z08.03 
_-tchebycheff.java) 



































3 次 式 5 次 式 6 次 式 
六 Ay 2 が Ay 細 Ay 
0.0 0.1953 0.0 0.0629 0.0 ー0.0279 0.0 6.88Eー5 
0.2391 3.88 セ ー16 | 0.1537 | 一 3.05 セ ゼー16 | 0.1070 | 一 4.44 セ ー16 | 0.0787 4.44 セ ー16 
0.9201 | 一 0.1567 0.5999 | 一 0.0737 0.4208 0.0279 0.3111 1.97 セ ー4 
1.9393 1.11 セ ー16 | 1.2950 1.11 セ ー16 | 0.9201 | 一 2.49 セ ー16 | 0.6853 5.55 セ ー16 
3.1415 | 一 9.95E セ ー17 | 2.1707 0.0989 1.5707 | 一 0.0267 1.1828 | 一 9.85 セ ー4 
4.3438 | 一 3.33Eー16 | 3.1415 5.55 セ ー17 | 2.3284 | 一 2.22 セ ー16 | 1.7785 3.33 セ ー16 
5.3630 0.1567 4.1123 | 一 0.1144 3.1415 0.0225 2.4425 0.0021 
6.0440 | 一 5.82 セ ー16 | 4.9881 2.22 セ ー16 | 3.9546 1.83E セ ー16 | 3.1415 0.0 
6.2831 | 一 0.1953 5.6831 0.1103 4.7123 | 一 0.0163 3.8406 | 一 0.0034 
6.1294 4.44 セ ー16 | 5.3630 | 一 4.44E セ ー16 | 4.5046 1.66 セ ー16 
6.2831 | 一 0.1053 5.8622 0.0111 5.1003 0.0043 
6.1761 | 7.77 セ ー16 | 5.5977 2.22 セ ー16 
6.2831 | 一 0.0093 5.9720 | 一 0.0047 
6.2044 6.66Eー16 
6.2831 0.0049 
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プロ グラ ム (Tchebycheff.java) の コン スト ラク タ . お よび メソ ッ ド の 構成 は 以下 の と 
お り で ある . 

















TchebychefFjava の コン スト ラク タ お よび メソ ッ ド の 構成 : 
1 pub1ic cl1ass Tchebycheff + 





2 int norder , nfunC: 

) double cm, CD: 

4 double[] [] c: 

5 

6 pub1ic Tchebycheff(doub1e xmin, doub]e xmax, int nfunc, 
M int norder, boo1ean check, MyFunction2 fu) て 

8 中略 

9) 

10 

11 pub1ic double[] checkPrint(MyFunction2 fu, boo1ean print) { 
12 中略 

43 

14 

15 pub1ic double[] [] tchebycheff(doub1e[] x) { 

16 中略 

17 + 

18 + 


1. L1 て 18: クラ ス Tchebycheff の 定義 で ある . 

2. L2 て 4: クラ ス 内 の コン スト ラク タ と メソ ッ ド で 共通 に 使う フィ ー ル ド の 宣言 
で ある . norder は 近似 式 の 次 数 . nfunc は 近似 する 関数 の 数 で あぁ る. cm, cp 6? 
g 座標 の 座標 変換 の 定数 で あり , c は 近似 関数 の 係数 で ある . 第 1 添字 が 関数 の 
数 nfunc, 第 2 添字 は 係数 の 数 norder+1 で ある . 

3. L6,7: コン スト ラク タ Tchebycheff の 定義 で ある . 引数 の xmin は 近似 する 領域 
の 最小 値 , xmax は 最大 値 で ある . nfunc は 近似 する 関数 の 数 . norder は 近似 式 
の 次 数 . check は 誤差 の 数 値 の 出力 の 制御 で true な ら 出力 を する . fu は イン タ 
フェ ー ス MyFunction2 の イン スタ ンス で あり , 近似 する 関数 の メソ ッ ド が 定義 
され て いる . 

4. L11, 12: メソ ッ ド checkPrint の 定義 で ある . 引数 の fm は イン タフ ェ ー ス 
MyFunction2 の イン スタ ンス で ある . print は 精度 を 示す 数 値 の 出力 の 制御 で 
true な ら 出 力 を する . 

5. L15: メソ ッ ド tchebycheff の 定義 で ある . 引数 の x は 近似 値 を 求め る z 座標 の 
配列 で ある . 戻り 値 は 近似 値 の 配列 で あり , 第 1 引数 が 関数 の 数 , 第 2 引数 が 
係数 の 数 の 2 次 元 配 列 で ある 




















9 て 



































プロ グラ ム (Tchebycheff.java) の コン スト ラク タ (Tchebycheff) と ,、 そ の 説明 は 以下 
の と お り で ある . 


Tchebychef.java の コン スト ラク タ (Tchebycheff) : 


1 pub1ic Tchebycheff(doub1e xmin, doub]e xmax, nt nfunc, 
int norder, boo1ean check, MyFunction2 fu) て 
選 this .nfumc= nfunC: 
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this . norder= noOrder : 
cm= (xmax-xmin)/2.0: 
CD= Cm+xm1n: 
c= new double [nfunc] [norder+1] : 
doub1e [] x= nev doub1e [norder+1] : 
doub]e [| xt= new doub]e [2*norder+3] : 
doub1e [] [] f: 
doub1e [] [] a= new doub1e [norder+1] [norder+1] : 
doub1e [] b= ne doub1e [norder+1] : 
double Ww,。 CW: 
int n= 0: 
doub1]e a1= Math ..PT*0 .5/ (norder+1 ) : 
for (int k=O: k<=norder: K++) て 
x[k]= cm*Math.cos((2*(norder-k)+1 ) *a1 ) +cD : 
+ 
= fu.function(x,nfunc ,norder+1 ) : 
Gauss_Shoukyohou gs= new Gauss_Shoukyohou() : 
for (int 1]=O: 1<nfunc: 1++) 
for (int 1=O: 1<=norder: 1+++) て 
bi]= [1] [] ) 
w= 1.0: 
cw= x[i] -cp: 
for (int k=0: k<=norder: k++) て 
al[i] [k]= wi 
W ニ W*CW: 
+ 
+ 
c[1]= gs.gauss_Shoukyohou(norder+1 ,a,D) : 


1. L1, 2 て 34: コン スト ラク タ Tchebycheff の 定義 で ある . 引数 の 説明 は 先 の と お り 
で ある . 
L5, 6: cm, cp に 座標 の 幅 の 半分 と 中 央 の 座標 値 を 代入 する . 

L7: 近似 関数 の 係数 を 代入 する 配列 c の イン スタ ンス を 作る 

L8: チェ ビシ ェ フ 多項式 の 値 が ゼロ と な る 点 の z 座 標 の 配列 で ある 

L9: 精度 を 調べ る た め の , チェ ビシ ェ フ 多項式 の 値 が ゼロ と な る 点 と , その 合間 
で 近似 が 悪く な る 点 の z 座標 の 配列 で ある . 

6. L10: 関数 値 の 配列 で ある . 

7. L11: 近似 式 の 係数 を 決め る 連立 1 次 方 程 式 の 係数 行列 で ある 

8. L12: 近似 式 の 係数 を 決め る 連立 1 次 方 程 式 の 右辺 の 定数 の 配列 で ある . 

9. L16 て 18: チェ ビシ ェ フ 多項式 の 値 が ゼロ と な る 点 の 座標 を 求め る . 

10. L19: その z 座標 に つい て , 関数 値 を 求め る 

11. L20: ガウ ス の 消去 法 の クラ ス Gauss_Shoukyohou の イン スタ ンス を 作る . 

12. L21 へ て 32: 近似 関数 の 数 だ け ル ー プ を まわ す . 

13. L22 で 30: 連立 1 次 方 程 式 の 右辺 の 定数 と 係数 行列 を 式 (8.20) で 求め る . 

14. L31: メソ ッ ド gauss_Shoukyohou で 近似 式 の 係数 を 決め る . 
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プロ グラ ム (Tchebycheff.java) の メソ ッ ド (tchebycheff) と 、 そ の 説明 は 以下 の と お り 


で ある . 


TchebychefF.java の メソ ッ ド (tchebycheff) : 


1 
ウ 
3 
4 
5 
6 
7 
8 
回 


10 
11 
12 
13 
14 
15 
16 
17 


pub1ic doubl1e[] [] tchebycheff(double[] x) { 


1nt npo1nt= x.1ength: 
double [] [] f= new doub1e [nfunc] [npoint] : 
doub1e xk: 
doub1e Wi: 
for (int k=0: kk く <=npoint-1 : k++) て 
xk= xx[k] : 
for (int ]j=0: ]<nfunc: j++) { 
w= c[]j] [norder] : 
for (int 1=norder-1: ]>=0: 1 ユ --) 
w= (xk-cp)*w+c []] [1] : 
+ 
f[]] [k]= wi 
店 
| 


retuTrn 革 : 


L1 て 17: メソ ッ ド tchebycheff の 宣言 で ある . 引数 の 説明 は 先 の と お り で ある . 
L3: 戻り 値 と な る 近似 関数 値 の 配列 の 定義 で ある . 

L6^ て 15: 近似 値 を 求め る 座標 の 数 だ け ル ー プ を まわ す . 

L8 て 14: 求め る 近似 関数 の 数 だ け ル ー プ を まわ す . 

L10 て 12: 式 (8.20) で 近似 値 を 計算 する . 

L16: 近似 値 の 配列 を 返す . 








PV 99 の だ 己 











イン タフ ェ ー ス (MyEunction2.java) の 抽象 メソ ッ ド (fanction) は 以下 の と お り で 


ある . 











MyEunction2.java の 抽象 メソ ッ ド (fanction) : 














1 pub1ic interface MyFunction2 て 


2 


3 } 


pub1ic doub1e[] [] function(doub1e[] x, int nfunc) : 


1. L1: イ ンタ フェー ス MyEunction2.java の 宣言 で ある . 
2. L2: 抽象 メソ ッ ド fanction の 宣言 で ある . 引数 の x は 関数 値 を 求め る 座標 f 
配列 で ある . nfaunc は 近似 する 関数 の 数 で ある . 








中 





の 














! 





8.3 デー タ の 平 消化 




















デー タ の 補間 の 場合 に は , 補間 曲線 は デー タ 点 の 上 を 通る けれ ども , デー タ の 平滑 
化 の 場合 に は , 誤差 を 含ん で ば らち つき の ある デー タ 引 ,? = 1,…・, 7 か ら , 滑ら か な 
デー タ 曲 線 を 作る こと で ある か ら , 曲線 は 必ず し も デー タ 点 の 上 を 通る わけ で は な い . 
最も 単純 な 方 法 は , ある 点 ? の 周り の 数 点 パ =2 ヵ 十 1 の 平均 を と る 
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で あろ う . これ は , 単純 移動 平均 法 と いわ れる . デー タ が 等 間隔 で 与え られ て お り , 
各 デ ー タ 点 の 周り で 多項式 近似 が 可能 な 場合 に は , 周囲 の いく つか の 点 の 値 に 重み を 
掛け て 平均 を と る サビ ツキ ー・ ゴ ー レ イ 法 が 使わ れる こと が ある . この 場合 は , 近似 
多項式 が 極め て 局所 的 に な る か ら , 局所 的 な 凹凸 が 残る こと に な る . 

一 方 .B スプ ライ ン に よる デー タ の 平滑 化 の 場合 は 与え られ る デー タ は な 等 間隔 で 
な く て も よい . デー タ 点 と は 別に , 節点 を 指定 し て B ス プラ イン か ら 平 滑 ス プラ イン 
関数 を 構築 する の で , 節点 の 数 は 比較 的 少数 で も よい . そこ で , 一 つの B スプ ライ ン 
が 多く の デー タ 点 を 含む 場合 に は , 関数 近似 の よう に 滑ら か な 関数 が 与え られ る . し 
か し , 極め て 局所 的 な 構造 が あっ て も , 埋もれ て し まう お それ は ある . また , デー タ 
こ 舌 っ た 点 が ある こと が わか っ て いる 場合 に は , その 点 に 複数 の 節点 を 賀 く こと で , 
舌 り を 表現 する こと が で きる . 




























































































8.3.1 サビ ツキ ー・ ゴ ー レ イ 法 





この 方 法 は , 平滑 化 を 行う 測定 デー タ な ど が 等 間隔 で 与え られ て お り , その デー タ 
点 の 周り で 多項式 近似 が 可能 な 場合 に 使わ れる . その 多項式 の 係数 の 数 より 多い デー 
夕 点 を 使っ て , 最小 二乗 法 で その 多項式 を 近似 する こと に より 平滑 化 を 施す こと に な 
る . そこ で , この 方 法 は 多項式 適合 法 と も いわ れる . 実際 に は , 各 z 点 に つい て 毎回 
多項式 か ら 平 滑 値 を 求め る の で は な く , 使用 する デー タ 点 の 重み 係数 を 使う 形式 に し 
て お いて , それ を 使っ て 平滑 値 を 求め る よう に し て ある . 表 8.2 は 3 次 式 を 5 て 15 点 
を 使っ て 最小 二乗 法 で 決め た と き の 重 み 係 数 で ある . 

この 表 を 使う と , 番目 の デー タ の ヵ 点 に よる 平滑 化 は 次 の 式 





















































1 @-D72 
"ニニ ニー う 2 ww% 証 (8.22) 
7 デニー(%ー1/2 
と な る . ここ で , %28 は 平滑 化 を する 前 の デー タ で あり , 9" は 平滑 化 に より 求め ら 


れる デー タ で ある . 
プロ グラ ム (Savitzky_Golay.java) の メソ ッ ド (savitzky_Golay) の 一 部 と その 説明 は 以 
下 の と お り で ある . 
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表 8.2 3 次 式 に よる サビ ツキ ー・ ゴ ー レ イ 法 の 重み 係数 ,. z 点 の 近く の 5 て 15 点 の デー タ 
を 使っ て 最小 二乗 法 で 平滑 化 さ れ た 3 次 式 を 決め た と き の 重 み 係 数 で ある . 第 1 行 の 0 は 
滑 化 で 修正 され る デー タ 点 を 示し て お り , その 列 の 数 値 は 重み で ある . 上 7 の 列 は , その 前 後 
7 番目 の デー タ 点 で の 重み で ある . 第 1 列 の ヵ ヵ は 使用 する 点 の 数 で あり , 最後 の 列 の W は 規 





以 































































































格 化 定数 で ある . 

72 0 L【 2 3 1 5 6 が 0/ 

5 17 12 | -3 35 
7 7 6 3 | 一 2 2 れ 1 
9 59 54 39 14 | 一 21 231 
11 89 84 69 4 9 | 一 36 429 
13 25 24 21 16 9 0 | -11 143 
15 | 167 | 162 | 147 | 122 87 42 | 一 13 | -78 | 1105 





























Savitzky_Golay.java の メソ ッ ド (savitzky_Golay) の 一 部 : 


1 pupblic doub1e[] savitzky_Golay(int n, double[] y, int nmin, int nmax) { 
2 doubl]e[] z= new double[y.1ength] : 
3 doub1e [] r= new doub1e [n] : 
4 doub1e [] rw: 

め doubl1e d, Sum 

6 nt min, max, 1, ], KK: 

4 doub1e[] r5= {35, -3, 12, 17}: 
8 中略 

9 1f (n==5) { 

10 TrW ニ 5: 

11 + e1se if (n==7) て 

12 中 略 

1 る ) int n2= n/2: 

14 d= rw[O] 

15 ェ [n2] = rw[n2+1] /d: 

16 for (1i=0: 1<n2: ュ ++) て 

17 r[1] = rw[i+1] /d: 

18 = n-i-1.: 

19 r[]= ri] : 

20 = nmin+i : 

21 z]]= 7] : 

22 ]= nmax-1: 

23 z]]= 7] : 

24 + 

25 m1n= n2+nmin: 

26 max ニ = nmax-n2: 

27 for (i= min: 1<=max: 1++) 

28 k= ュ 1-n2 : 

29 Sum= 0.0: 

30 for (]j=0: ]<n: ]++,K++) て 

31 Sum= Sum+y[k]* ェ []] : 
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32 +} 

33 [1]= sum : 
34 + 

35 return ろ : 

36  }+ 





1. L1 て 36: メソ ッ ド savitzky_Golay の 定義 で ある . 引数 n は 平滑 化 に 使う デー タ 
の 数 , y は 平滑 化す る デー タ の 配列 、 nmin は 配列 y の うち , 平滑 化す る デー タ 
範囲 の 最小 値 。 nmax は その 最大 値 で ある . 戻り 値 は 平滑 後 の 配 列 で ある . 

2. L2: 戻り 値 と し て 返す 平滑 後 の 配 列 の 宣言 で ある . 

3. L3: 計算 に 使う た め の 重 み 係 数 の 配列 で ある . 

4. L4: 実際 に 使う デー タ の 配列 の 参照 が 代入 され る . 

5. L7: n=5 の 場合 の 係数 の 配列 を 作る . 第 1 要素 は 規格 化 定数 で あり , その 後 
に 表 8.2 の デー タ が 左 か ら 順 に 並ん で いる 

6. L9, 10: 配列 rw に r5 の 配列 の 参照 を 代入 する . 

7. L15, 17, 19: 係数 を d で 割っ て , 本 来 の 係数 の 値 に し て いる 

8. L20 へ 23: 平滑 化す る デー タ の 両端 n/2 点 ず つ は , この 方 法 で は 平滑 化 で き な い 
か ら , 元 の デー タ の 値 を を の まま コピ ー し て お く 

9. L27 へ 34: 上 記 両 端 の 内 側 で 平滑 化 を 繰り 返す . 

10. L28: i は 平滑 化す る デー タ の 添字 番号 、k は 平滑 化 に 使う 添字 の 最小 値 で ある . 

11. L29: デー タ 値 と 重み の 積 和 を 作る た め の ゼ ロ で の 初期 化 . 

12. L30 て 32: n 回 ルー プ を まわ し , 積 和 を 作る 

13. L33: 配列 z に 平滑 後 の 値 を 代入 する 

14. L35: 配列 z を 戻り 値 と し て 返す . 






























































































































































図 8.4 は 範 1, 1| に お ける 等 間 了 で の 100 点 の > に 対し て , ヵ = z2 の 値 に 
と 0.02 の 正規 分 布 乱数 を 加算 し て 作っ た デー タ と , 7 点 3 次 式 の サビ ツキ ー・ ゴ ー 
レイ 法 を 施し て 平滑 化し た デー タ で ある . 一 番 下 の + 印 は 平滑 化 前 の 元 の デー タ で あ 
り , 上 に 0.25 シフ ト し て ある o 印 は 1 回 平滑 化 を 施し た デー タ , 0.5 シフ ト し て ある 
































図 8.4 7 点 3 次 式 の サビ ツキ ー・ ゴ ー レ イ 法 に よる 2 次 式 デ ー タ の 平滑 化 . 下 か ら 元 の デー 
タ , 平滑 化 を 1 回 , 2 回 , 3 回 施し た デー タ で あり , 順に 0.25 ずつ 上 に ずら し て 示さ れ て い 
る . 元 の デー タ は 関数 = ァ ? ce で あり , c は ヶ =0.02 の 正規 分 布 乱数 で ある . デー タ 点 は 
[-1, 1] の 100 分 割 で 作っ て ある . 
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o 印 は 2 回 、 0.75 シフ ト し て ある o 印 は 3 回 平滑 化 を 繰り 返し て 施し た デー タ で ある . 
回 数 を 増やす に 従っ て より 平滑 化 が 進ん で い ぃ る. 7 点 を 使う 場合 で は , 両端 の それ ぞ 
れ 3 点 に つい て は , 式 (8.22) が 使え な い . 平 消化 に は , 多数 の 点 の 式 を 使う より , こ 
の よう に 繰り 返す ほう が 効率 が 良い よう で ある . 

図 8.5 は 範囲 [0, 10] に お ける 等 間隔 で の 200 点 の z に 対し て , げ (>) 














ー 1 

1 十 (*ー3)2 
の 値 に ヶ =0.05 の 正規 分 布 乱数 を 加算 し て 作っ た デー タ と, 7 点 3 次 式 の サビ ツキ ー・ 
ゴー レイ 法 を 施し て 平滑 化し た デー タ で ある . 一 番 下 の + 印 は 平滑 化 前 の 元 の デー タ 
で あり , 上 に 0.2 シフ ト し て ある o 印 は 1 回 平滑 化 を 施し た デー タ , 0.4 シフ ト し て あ 
る o 印 は 2 回, 0.6 シフ ト し て ある o 印 は 3 回 平滑 化 を 繰り 返し て 施し た デー タ で あ 
る . 回 数 を 増やす に 従っ て より 平滑 化 が 進ん で いる が , か な り 細 か い 構 造 ま で 残っ て 
いる . 




































































8.3.2 ゼス プラ イン に よる 平滑 化 




















再び B スプ ライ ン を 使っ て . ここ で は デー タ の 平滑 化 を 行う . 補間 の 場合 , 補間 関 
数 の 式 (3.30) は 
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9 の)ー タナ Wi の ) (8.23) 























5(z:) 三 6 ニル … 9) (8.24) 














を 解く こと で 係数 c,(? = 1,…・, ヵ ) を 求め る こと が で きた . この 補間 の 場合 に は , 
デン 十 7 の の 関係 が ある . 一 方 , 平滑 化 の 場合 に は ,. デー タ 点 の 数 ヵ は 節点 の 数 より 











図 8.5 7 点 3 次 式 の サビ ツキ ー・ ゴ ー レ イ 法 に よる ピー ク 値 の ある デー タ の 平滑 化 . 下 か ら 
元 の デー タ , 平滑 化 を 1 回 2 回 、 3 回 施し た デー タ で あり , 順に 0.2 ずつ 上 に ずら し て 示さ 


れ て いる . 元 の デー タ の 関数 は 7() = 生 で ー +e で あり , c は っ = 0.05 の 正規 分 大 


数 で ある . デー タ 点 は [0, 10] の 200 分 割 で 作っ て ある . 点線 は <= 0 で の 式 の 曲線 で ある . 












































十分 に 多い こと が 必要 で あり , デー タ の 平滑 化 は 式 (8.23) に 最小 二乗 法 を 適用 し た 関 
数 近似 で ある . この 場合 の 最小 二乗 法 は , 2 乗 和 














9=〉 SO りー (8.25) 
? 王 1 


を 係数 c, (2 = 1.…・, ヶ 十 7) で 偏 微分 し て ゼロ と 置い て で きる ァ ヶ 二 ヵ ヵ 元 の 連立 方 程 式 


4c=b (8.26) 





を 解い て c, を 決定 する 方 法 で ある . この 式 の 係数 行列 4 の 要素 は 





ん > だ 時 16 の WW A(z。) (8.27) 
で あり , ベク トル b の 要素 は 


5, 三 OM 7(z0 (8.28) 





で ある . この 場合 も , 式 (8.27) の 和 の 中 で ゼロ で な い 7(z。) は 高々 個 で ある . 
プロ グラ ム (Bspl_Smooth.java) の メソ ッ ド (bspl_Smooth) と ,、 そ の 説明 は 以下 の と 
お り で ある . 





Bspl_Smooth.java の メソ ッ ド (bspl_Smooth) : 


1 pupb1ic doub1e bsp1_Smooth(int nx, double[] xd, doub1e[] yd, 
2 int nx1i, doub1e[] xi, int ior, 

8 int nn, doub]e[] xx, double[] yy, doub1e[] res) { 
4 1nt neq= nxi-1o エ : 

5 double [] [] a= new doub1e [neq] [ior] : 

6 double[] b= new doub1e [neq] : 

7 doub1e[] c= new doub1e [neq] : 

8 

9 renritsu(nx ,xd,7d, nx1,x1。 1OF,。 a,D) : 

10 c= chol1esky(neq, ior, a,D) : 

11 doub]e ans= keisan(nx ,xd,Yd, nx1 ,xX1, 1O エ , で , 

1 nn ,XX,7Y, Te8) : 

員 3 return anS: 

14 ょ 』 


1. L1 て 3 て 14: メソ ッ ド (bspl_Smooth) の 定義 で ある . 引数 の nx は 標本 デー タ の 
半数 、xd は 標本 デー タ の z 座標 の 配列 yq は 標本 デー タ の ヵ 座標 の 配列 , nxi 
は 付加 人 節点 を 含め た 節点 の 個数 , xi は 節点 の z 座標 の 配列 ior は B スプ ライ ン 
の 階数 、 nn は 求め る デー タ の 個数 , xx は 求め ある デー タ の 座標 の 配列 , yy ( 
人 0 の m の の の 
戻り 値 は 標準 偏差 で ある . 
.。 L4: B ス プラ イン の 数 neq は , 節点 の 数 か ら 階 数 を 引い た 値 , nxi-ior で ある . 
3. L5: a は 連立 方 程 式 の 係数 行列 で ある が , 各行 で で ゼロ で な い 値 を も つ 要 素 は 階数 
以下 で ある か ら , 第 2 添字 の 数 は ior で よい . その 代わ り , 連立 方 程 式 を 解く 次 
の メソ ッ ド choresky は 複雑 に こ な っ て いる . 
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図 8.6 3 次 の B ス プラ イン に よる 2 次 式 デ ー タ の 平滑 化 . 関数 は /(z) = z" 二 ec で ある . e は 
ヶ 三 5.0 の 正規 分 布 乱数 で ある . デー タ 点 は [-1, 1] に 等 分 割 で 101 個 作 っ て いる . 節点 は 








4. L6,7: b は 連立 方 程 式 の 右辺 の 定数 の ベク トル で あり , c は 解 の ベク トル で , ス 
プラ イン 多項式 の 係数 で ある 

5. L9:a と b を 求め , 連立 方 程 式 を 作成 する メソ ッ ド renritsu を 呼ぶ . 

6. L10: 連立 方 程 式 を コレ スキ ー 法 の メソ ッ ド choresky を 呼ん で 解き , 解 を c に 代 
入 す る . 

7. L11, 12: 配列 xx に 指定 し た x 値 に お ける 平滑 後 の 関 数 値 、 残 差 な どの 値 を , メ 
ソ ッ ド keisan を 呼ん で 計算 する . 戻り 値 と し て , 標準 偏差 値 を 受け 取る . 

8. L13: 戻り 値 と し て , 標準 偏差 値 を 返す . 


























図 86 は 3 次 の B ス プラ イン に よる デー タ の 平滑 化 で ある . 関数 は 7(z) = z2 十 ce 

で あり , ヶ =5.0 の 正規 分 布 乱数 gc で. ばらつき を も た せ て ある . > の 範囲 [-1, 1] に 
デー タ は 101 個 あり , 節点 の 数 は 両端 の 付加 節点 4 個 ず つ を 含め て 17 個 で ある . 具体 
的 に は , 1, 一 1, 一 1, 一 1, 一 0.8, 一 0.6. 一 0.4, 0.2, 0.0, 0.2, 0.4, 0.6, 0.8, 1, 1, 1. 1 で あ 
り , 付加 節点 以外 は , 等 間隔 に と っ て ある . それ ら は yz 軸 上 に バー で 示さ れ て いる . 
サビ ツキ ー・ ゴ ー レ イ 法 を 使っ た 平滑 化 の 図 8.4 と 比較 し て , 人造 か に 滑ら か に な っ て 
いる . し か し , 実験 デー タ に よっ て は , 2 次 式 か ら は ずれ て いる 細か い 構 造 に 意味 が 
ある 場合 も あり , ふさ わし く な いこ と も ある . 
RB 株 問 数 ET に し 
を 施し た 例 で ある . っ =0.05 の 正規 分 布 乱数 cg で . ば ら つ き を も た せ て ある . デー タ 
数 は 201 個 あ り , 節点 の 数 は 両端 の 付加 節点 4 個 ず つ を 含め て 17 個 で ある . 具体 的 に 
は (0, 0, 0, 0, 0.75, 1.25, 2, 2.5, 3.75, 5, 6.25, 7.5, 8.75, 10, 10, 10, 10) の 17 点 で あり , 
ヶ 軸 上 に バー で 示さ れ て いる . ピー ク の 左側 で は 右側 より 多く の 節点 を 使っ て いる が , 
変化 の より 大 き な 左 側 で 節点 の 数 を 増やさ な いと 平滑 曲線 に 大 き な 振 動 が 生じ て し 
まう 。 

発散 点 や 鋭い ピー ク 値 な どの 特異 点 が ある 場合 に は , その 特異 点 を 3 重 の 節点 と す 
る こと に よっ て , 表現 する こと が で きる . 図 8.8 の 関数 は 7(z) 
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あり , 関数 の ピー ク と な る =3 で げ (3) = 10.0 と な る よう に , 図 8.7 の 分 母 の 定数 
































端 の 付加 節点 を 含め 17 点 で あり , > 軸 上 に バー で 示さ れ て いる . x 印 が デー タ で あり , o 印 





が ] 


F 滑 化 を 施し た 値 で , 0.25 上 に シフ ト し て ある . (Z08_06_Bspl_Smooth_2ji.java) 








"10x 





図 8.7 3 次 の B ス プラ イン に よる ピー ク 値 の ある デー タ の 平滑 化 . 関数 は z = 3 に ピー ク 


を も っ 7 で ) = ーーー 編 “で あり 。< は の =005 の 正規 分 布 大 数 で ある 、 デー タ 点 は 


[0,10] で 201 点 あ る . 両端 の 付加 節点 を 含め て 17 点 の 節点 は , z 軸 上 に バー で 示さ れ て 
いる . x 印 が デー タ , 実線 が 平滑 曲線 , 点線 が e = 0 で の 式 の 曲線 で ある . (Z08_07_Bspl 


_Smooth.] ava) 


















































0 3 10 x 


8.8 3 次 の B ス プラ イン に よる 鋭い ピー ク 値 の ある デー タ の 平滑 化 . 関数 は ァ = 3 に 鋭い 


ピー ク を も つげ (z) = ーー 十 e で あり , ec は =0.05 の 正規 分 布 乱数 で ある . デー タ 


点 は [0, 10] で 201 点 あ る . 両端 の 付加 節点 を 含め て 20 点 の 節点 は , z 軸 上 に バー で 示さ れ て 
お り , 3 重 節点 で ある 3 は o 印 で 示さ れ て いる . x 印 が デー タ , 実線 が 平滑 曲線 で ある . (Z08 
-08_Bspl.Smooth_peak.java) 












































を 1 か ら 0.1 に 変え て ある . この ピー ク を 表現 する た め に , 先 の 節点 17 個 の ほか に , 
ピー ク 値 と な る ヶ =3 の 値 を 3 個 追 加 し て , (0, 0, 0, 0, 0.75, 1.25,、2, 2.5, 3, 3, 3, 
3.75, 5, 6.25, 7.5,8.75, 10, 10, 10、 10) の 20 点 と し て ある . 3 重 節点 は > 軸 上 の 3 に 
eo 印 で 示さ れ て いる . 

スプ ライ ン 関 数 に よっ て 平滑 曲線 を 作る と き , デー タ は 多く な けれ ば な ら な い が , 
節点 は うま く と れ ば か な り 少 数 で よい こと が 多い . 図 を 見 な が ら , 旗 行 錯誤 で 節点 を 
追加 する こと も で きる が , すべ て の デー タ 点 に お いて 現在 の 平滑 曲線 と 適当 な 隊 値 以 
上 食い 違っ て いる 点 が あっ た ら , その 付近 に 節点 を 追加 し て いく , 逐次 分 割 法 な どの 
アル ゴリ ズム が ある こと を 付け 加え て お く . 
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8.3.3 フー リエ 変換 を 使う 平 消化 


第 10 章 で 扱う フー リエ 変換 の 一 種 で 効率 の 良い FEFT を 使っ て デー タ の 平滑 化 を 行 
う . 平滑 化 に 使う 関数 に . ガウ ス 関 数 や ロー レン ツ 関 数 を 用 いれ ば , 畳み 込み に な る . 
これ は , サビ ツキ ー・ ゴ ー レ イ 法 の 重み 係数 の 代わ り に , ガウ ス 関 数 や ロー レン ツ 関 
数 の 値 を 使う こと と 同等 で も ある. ガウ ス 関 数 や ロー レン ツ 関 数 の パラ メー タ や T 
を より 大 きく と れ ば , より 遼 く の デー タ を 取り 入れ る こと に な り , より 小さ く と れ ば 
より 近く の デー タ し か 取り 入れ な いこ と に な る . B ス プラ イン の よう に , 節点 の 選び 
方 の よう な 難し さ は な く , パラ メー タ の 値 を 選ぶ だ け で 平滑 化 の 程度 を 制御 する こと 
が で きる の で 簡単 で やる. また , パラ メー タ の 値 の 選び 方 に も よる が , サビ ツキ ー・ 
ゴー レイ 法 よ り 広 域 的 な 平滑 化 を する こと も で きる . 

図 8.9 は , 図 8.5 や 図 8.7 と 同様 な デー タ を , ガウ ス 関 数 を 使っ た FFT を 用 いて 平 


ヶ = 0.05 の 正規 分 布 乱数 で ある . 重なっ て いる 曲線 は , c = 0 の 真 の 関数 で ある . 左 
の 曲線 は , 下 か ら ヶ =0.1, 0.2, 0.4, 0.8 の ガウ ス 曲 線 で あり , 対応 し た 右 の 図 は ,. それ 
ぞ れ の ガウ ス 関 数 を 使っ て EEFT の 四 み 込み で 平滑 化し た も の で ある . ヶ =0.1 の 場合 
は , ピー ク 値 は 低く な っ て いな い が , か な り , ば ら つ き が 残っ て いる . =0.8 の 場合 
は , ば ら つ き は 消え て いる が , ピー ク 値 は か な り 低 く な っ て お り , =0.4 程度 が 良さ 
そう で ある . 
デー タ 点 は 201 点 あ る が , FFT に 乗せ る た め に は 512 点 、。 あ るい は 1.024 点 に 拡 
張 す る 必要 が ある . ここ で は , ピー ク の 中 心 の ヶ ァ = ニ 3 が 1.024 点 の 中 央 に 来る よう に 
デー タ を コピ ー し , デー タ が 不足 する 両方 の 外側 に は ゼロ を 代入 し て お く . この まま 










































































































































































図 8.9 FPT を 用 いた 平 消化 関数 は /( 々 ) ニ エーーーgjz で ある . c は ヶ =005 の 正規 


分 布 乱数 で ある . デー タ 点 は [0. 10] で 201 点 あ り , x 点 で 示さ れ て いる . 重なっ て いる 曲線 
は , e=0 の 真 の 関数 で ある . 点線 は ,. フー リエ 変換 で 意味 の な い 振 動 が 入ら な いよ うに , グ 
ラフ の 両端 で 値 が ゼロ に 近づく よう に 引き 去る 下駄 の 関数 で ある . 下 か ら 2 番目 の 実 曲 線 は , 
左 に 志 さ れ て いる = 0.1 の ガウ ス 関 数 を 使っ て FEFT の 晴 み 込み で 平滑 化し た も の で あり , 
上 方 へ 20 ずつ シフ ト し て ある . 下 か ら さ ら に , =0.2, 0.4, 0.8 の 場合 の 曲線 で ある . 


































































































演習 問題 143 




















で は デー タ の 両端 で 段差 が 生じ , フー リエ 変換 で 無 意 味 な 振動 が 入っ て くる の で , 図 
の 点線 で 志 し て ある 関数 を 下駄 と し て 引き 去り , 段差 を な くし て いる . そこ で , 平滑 
化 の 後 で その 下駄 を 履か せ て いる . プロ グラ ム の 詳細 は 後に ゆず る . 





























演 壮 問 是 




















8.1 次 の 表 は ある 果物 の 収穫 量 ヵ の , 5 月 の 平均 気温 > に 対す る 数 値 で ある . z 
と ヶ の 間 に 2 次 式 の 関係 = zz2 十 0z 二 c が ある と 仮定 し て , 最小 二乗 法 で 係 
数 4 c を 決め な さい . 























20.0 | 20.5 | 21.0 | 21.5 | 22.0 | 22.5 | 23.0 
12.0 | 12.3 | 14.4 | 15.1 | 18.9 | 20.3 | 21.7 
23.5 | 24.0 | 24.5 | 25.0 | 25.5 | 26.0 
22.0 | 21.1 | 20.4 | 18.1 | 16.9 | 13.0 





S SR IS SS 























答 : 。 ニ ー0.989, 5 = 46.217, c = 518.956 
解答 例 : ソー スプ ログ ラム QO8_01_.Z08_02_SJH_2jishiki.java 























8.2| 3 次 の B ス プラ イン を 使っ た 平滑 化 の プロ グラ ム Z08_.07_Bspl_Smooth.java 
の 節点 を 変え て , 平 消化 の 様子 を 調べ な さい . 
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固有 値 問題 


























固有 値 問 題 は 振動 , 波動 現象 な どの 解析 に 必須 な こと で あり , 構造 物 の 振動 や , 量 
子 物理 学 の 波動 関数 を 扱う 分 野 で は 最も 重要 な 数 値 計算 法 の 一 つ で ある . 一 方 ,2 次 
H 線 の 主軸 を 求め る 主軸 問題 は 最も 簡単 な 固有 値 問題 で ある . 







































































9.1 主軸 問題 














中 心 は 原点 に ある が , 軸 が 傾い て いる 権 円 を 扱う こと に する . 基本 と な る 座標 軸 を 
と し , 傾い た 椿 円 の 方 程 式 を 














gz 二 27zg 十 69" ニ 1 (9.1) 


[ 








と する . 原点 を 中 心 に 角 9 だ け 右 (時 計 回 り ) に 回 転 し た 座標 軸 >/. ? が この 椿 円 の 主 
軸 と な っ て いる な ら ば , この 椿 円 の 方 程 式 は 





























の エ どり? 三 1 (9.2) 











で ある 1. 両 式 を 行列 を 使っ て 表す と , それ ぞ れ 


g@, 1 
(?, y ! () 三 1 (9.3) 
/ / の 0 の = 崇 
ら の ( 間 ンコ 08 


で ある . また , 両 座標 系 で の 座標 値 (>,) と (Z/,) の 関係 は 図 9.1 か ら わ か る よ 


うに 


























"ーッ ァ cos の 9 一 ysin の (95) 
7 ー ィ sin の 十 cos の ] 








で ある . これ を , 行列 を 使っ て 表す と 











1. 檜 円 の 方 程 式 が 式 (9.2) で 表せ る と き , その 座標 軸 を 主軸 と いう . 
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り に の 9 だ け 回 転 し て いる gz', 座標 . 


の, sin の 『 の, 一 sin の 
山 a00| くく / | 二 |、。 。。 0 | 00 
ーsin の , cos の 0/ sin の , cos の 0/ 


ある い は 」 


/ へ / cos の 一 sin の Pi cos の 9, sin の の 
語 ー 9.7 
(の の "の [ sin の 9 cos の ) () ーsin の , cos の 4 2 


で ある . 式 (9.7) の 関係 を 式 (9.3) に 代入 する と ., 


た cos の 9, 一 sin の 8 cos の 9,。 sin の の 
三 1 6 
0 り [ Sim の, cos の ) 5 ) ーsin の , cos の ダ の 8 


と な る . これ を 式 (9.4) の 形式 に まとめ る と , 








図 
〈 〇 
1 
に こ 
妥 
引 
ee 
下 
ロ 




















1 
gcos29 一 sin29 十 sin^ の, 2(@ー の sm29 十 cos29 ) 
= 人 1 


1 
ぅ @ー 5) sin 29 十 cos29, osin*9 二 sin 29 十 cos2 9 


と な る . 式 (9.4) と 比較 する と , 式 (9.9) の 行列 の 非 対 角 要 素 が ゼロ と な る た め に は , 
5(< ー5)sin29 十 cos29 =0 (9.10) 


で な けれ ば な ら な い . これ より , 











4 デ 5 の 場合 2 の 
本 
g 三 5 げ 導 0 の 場合 cos29=0 (9.11) 
ea ニム げ ニ 0 の 場合 9= 不定 
で あり , さら に 
1 ー2 
Z デ 5 の 場合 の an 7 
2 一 
(9.12) 








g 三 ち げ 0 の 場合 9=45? 二 ヵ x90? ( ヵ は 整数 ) 
g 三 ち げ =0 の 場合 9= 不 定 








146 


9.2 


図 9. 


径 は 
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で ある . この 。= ム 5 げ デ 0 の 場合 は 式 が と ヶ 2 に つい て 対称 に な っ て いる か ら , 
主軸 は 45? の 方 向 で ある . また , g= ニ 5 げ = テ 0 の 場合 は , 方 程 式 は zz2 gy? =1 
で ある か ら 円 で あり , 主軸 の 方 向 は 不定 で ある . さら に 式 (9.9) の 行列 の 対 角 要 素 を 
式 (9.4) と 比較 する と , 




















g ー gcos29 一 sin20 二 5sin* の 
(9.13) 
の = gsin29 二 sin20 十 5cos29 
1 1 
が 決ま る . この と き の 主 軸 の 半径 は , z" 軸 と 7 軸 と で , それ ぞ れ と 一 - で ある . 
2 Vg ~YZ 











図 9.2 は 3z2 二 2V3zy 十 57? ニ 1 の グラ フ と , 点線 は 後 で 解説 する ヤ コ ビ 法 で 求め た 
主軸 z/, 7 で ある . 長 軸 の 半径 は 0.70710, 短 軸 の 半径 は 0.40825 で ある 





























2 3z2 十 2V3zy 十 5" = ニ 1 の 椿 円 と 主軸 z", 7 (点線 ) . 長 軸 の 半径 は 0.70710, 短 軸 の 半 
0.40825 で ある . (Z09.02_JacobiDaen) 














固有 値 と 固有 ベク トル 











2 次 元 の 主軸 問題 は 上 に 述べ た よう に , 非 対 角 要 素 が ゼロ に な る よう に し て , 簡単 
に 解く こと が で きる . この 方 法 は 後 で 述べ る ヤ コ ビ 法 を 2 次 元 行列 に 適用 し た こと に 
な っ て いる . し か し , 3 次 元 以 上 に な る と, 非 対 角 要素 が 3 組 あ る の で , 一 度 ゼ ロ に 
し た 非 対 角 要 素 も , 別 の 非 対 角 要 素 を ゼロ に する 変換 操作 で ゼロ で な く な っ て し まう . 
そこ で , 3 次元 以上 の 場合 に は , 計算 機 に 頼る 必要 が ある . 次 元 数 が 小さ いと き に 効 
率 が 良く て 簡便 な 直接 法 や ヤ コ ビ 法 , 絶対 値 の 大 きい 固有 値 を 数 個 求 め る の に 適し た 
累乗 法 。 行列 の 次 元 数 が 大 きい と き に 効率 が 良い 本 格 的 な QR 法 な ど が ある . まず , 
主軸 問題 と 固有 値 問 題 の 関係 を 説明 する . 
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9.2.1 固有 値 問題 


ここ で , 式 (9.8) と 式 (9.4) を 比較 する と, 


cos の 9。 一 sin の @, cos9, sin の 
sin 9, cos の カカ 5 ーsin の , cos の 


た な る 、 こ と で 。 


@,。 cos9, sin の @。 0 
4 ニテ * ざー * パテ ] 9.15 
カカ 5 ) ーsin の 9, cos9 ) 0, ) 


と 置く と , 式 (9.14) は 直交 変換 ? の 式 


| 
ンダ へ 
直 4 
ら 
ニン 
ジュ 
の 
中 
中 
の 























9749 ニ の (9.16) 


と な る . 57 は 9 の 転 置 行 列 で ある . 行列 9 の よう に 


b 催 二 間 
2_ 575 三 2 し re 07 三 0 0 9 (9.17) 


が 成り 立つ 行列 の こと を 直交 行 別 と いう . た だ し , gs, な ど は 行列 S の 要素 で あり , 
0 は クロ ネッ カー の デル タタ で ある . 
式 (9.16) の 両辺 に 左 か ら 9 を 掛け る と , 








49 = ニタ の (9.18) 


と な る . これ は , 
cos の 9 \ cos の 
4( ーsin の ) 日 ーsin の ) 
sin の sin 9 
4 ーー/ 
則 伯 間 


の よう に 書き な お すこ と が で きる . 式 (9.19) で ,.g と 7 は 行列 4 の 固有 値 、s」 = 
( 82 ] と ー( 計 ) は それぞれ 。 固有 値 " と びに 属す る 固有 ペク トル と 


ーsin の Os の 
いわ れる . 先 の 椿 円 の 主軸 問題 と の 兼ね 合い で いう と , 固有 値 〆 と / は 2 本 の 主軸 の 


半径 7 と ア の 導 数 の 2 乗 で あり , 固有 ベク トル s」 と s。 は 各 主 軸 方 向 の 単位 ベク 


トル で ある . 一 方 , 5 = (si, ss) で あり , s」 と s。 は 行列 5 の 列 ベ クト ル で ある . 9 は 
直交 行列 で ある か ら , 各 列 の 大 き さ は 1 で あり , 異な る 2 列 の 内 積 は ゼロ で ある . そ 
こ で , 固有 ベク トル に は 直交 規格 関係 が 成り 立つ . 

一 般 的 に ヵ 次 元 の 実 対称 行列 (要素 が 複素 数 の 場合 に は エル ミー ト 行 列 ) 4 の 固 
有 値 , 固有 ベク トル を 求め る 場合 に は , 式 (9.18) の 9 は ヵ 次 元 の 直交 行列 (要素 が 複 


(9.19) 








































































































2. 











ある 行列 を 直交 行列 と その 転 置 行 列 で 挟ん で 変換 する こと を 直交 変換 と いう . 
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素数 の 場合 に は ユニ タリ ー 行 列 ) , D は ぁ ヵ 次 元 の 実 対 角 行 列 で ある . 式 (9.19) は 一 般 


























4s, ニ gs5。 (2 ニ 1.…|」 の) (9.20 
と 書く こと が で きる . これ を さら に 書き 換え る と , 式 (9.20) の ヵ 個 の 式 に 対し て 共通 
な 式 
@ ロ コー@ gi2 ーー 1]p 81 
21 go2 一 9 …・ 9 22 |_o (9.21) 
dz ヵ 1 0d ヵ 2 ーー の 上 ーー の 8 ヵ 





と な り , これ は ヵ 元 連立 同 次 方 程 式 で ある . この 連立 方 程 式 が s = 0 以外 の 解 を も つ 
た め に は , g が 


の ロー gd12 ーー の 1p 
21 22 一 9 …・ 9@2 ぁ こ 0 (9.22) 
の ヵ 1 G ヵ 2 "ーー dp 一 d 





の 根 で な けれ ば な ら な い . この 式 (9.22) は 行列 4 の 固有 方 程 式 と いわ れる 
この 固有 方 程 式 が 対 角 行 列 か ,. 下 三角 行 列 % ぬ る い は 上 三角 行列 で あれ ば , 式 (9.22) 
は 
























































(@gー9 の (222 一 の … (の 。ー の =0 (9.23) 





と な る の で , 固有 値 は 














で ある . そこ で , 固有 値 問題 を 解く と いう こと は , 行列 4 に 変換 を 施し て , 対称 行列 
の 場合 に は 対 角 行 列 に , 非対称 行列 の 場合 に は 下 三角 行列 ある い は 上 三角 行列 に する 
こと で ある と も いえ る . た だ し , 変換 に よっ て 固有 値 が 変わ らち ら な いよ うに し な けれ ば 
な ら な い . そこ で , 先 の 主軸 問題 で 見 た よう に , 椿 円 (一 般 的 に は ヵ 次 元 空間 で の 2 
次 形式 ) の 形 を 変え な いよ うに , 直交 変換 の 式 (9.16) を 使う こと に な る . 以下 で 述べ 
る , ヤ コ ビ 法 や QR 法 で は この 考え を 使っ て いる 






















































































9.2.2 直接 法 


固有 方 程 式 (9.22) の 解 で ある 固有 値 』 を 2 分 法 な ど を 使っ て 求め , 各 固 有 値 ご と に 
その 値 を 式 (9.21) に 代入 し て , 固有 ベク トル を 求め る こと が で きる . まず , 固有 値 の 
ーー つの を 式 (9.21) に 代入 する . 次 に , s, の どれ か 一 つ s。 の 値 を 1 と し て 式 (9.21) に 
代入 し , その 列 を 右辺 に 移 項 する と 



























































9.2 固有 値 と 固有 ベク トル 149 




















(qq ュー の 3 十 g1255 十 …・ 十 の 8 三 一 
2181 十 (g22 一 52 十 …・ 十 g2z5 三 一 92p 
(9.25) 
5191 芽 9 ゎ 292 +… 十 (9 ぁ ヵ ぁ ーー の 5。 ニー ニー(9 ぁ ー の 
7 ヵ 191 十 G ヵ 292 5 十 (@ 一 の 5 ヵ 三 一 G ヵ p 











と な る . これ は , ( ヵ ー1) 元 連立 1 次 方 程 式 で ある が , 式 の 数 は ヵ 個 ある の で , 一 つの 
式 を 捨て る こと に な る . この 場合 . ( ヵ ー1) 個 の 方 程 式 が 1 次 独立 で な けれ ば な ら な い 
か ら , 捨て る 方 程 式 を どれ に する か 気 を 付け な けれ ば な ら な いこ と も ある . この 連立 
方 程 式 を 解い て , 残り の ( ヵ ー1) 個 の s, を 求め , 最後 に ベク トル s を 規格 化し な お せ 
ば , 固有 ベク トル と な る . この 方 法 は 効率 が 良く な い が , 行列 4 の 要素 が 固有 値 に 依 
存する よう な 拡張 され た 固有 方 程 式 の 場合 に は , この 方 法 に 頼ら ざる を 得 な い . 





ュ ン 
























































0.2.3 ギヤ ラビ 流 





ここ で は , 比較 的 簡単 な ヤ や コ ビ 法 を 説明 する . 4 が 2 次元 対 称 行 列 の 場合 の 固有 
値 問 題 は すでに 述べ た と お り で あり , 式 (9.14) を 満た す 9 を 求め れ ば よく , それ は 
式 (9.12) で ある . s 次元 の 場合 に は , ヵ 次 元 の 対称 行列 4 に 対す る 式 (9.16) の 9 を 求 
め な けれ ば な ら な い . まず , 適当 な 直交 行列 5, に より , 4 に 直交 変換 9?49」 を 施し , 
どれ か 一 つの 非 対 角 要素 を 0 に する . 次 に , また 適当 な 直交 行列 9%。 に より , 直交 変換 
52.97 45195。 を 施し , 別 の 一 つの 非 対 角 要素 を 0 に する . その 際 , 先 に 0 に し た 非 対 
生 要 素 が 0 で な く な る こと も ある が , 却 の 値 よ り は 0 に 近く な っ て いる . そこ で , す 
べ て の 非 対 角 要素 が 十分 小さ く な る まで 直交 変換 を ヵ ヵ 回 繰り 返せ ば , 式 (9.16) は , 













































































間 二 あめ っ 思 。 


(9.26) 
6749 党 





と する こと が で きる . ここ で , 対称 行列 4 の 4,。 要素 を 消去 する 直交 変換 の 直交 行列 
を 扱う . それ は 








1 0 0 0 
0 1 0 0 
0 0 cos の sin の 0 > ヵ 行 

= ニ | 0 . 軸 0 (9.27) 
0 ーsin の cos9 0 0O > 9 人生 
0 ・ 0 1 0 
0 ・ 0 0 1 

で ある . 成分 で 書く と 

spp 三 cos9, spg 三 Sin の 

sjp デーsin の , s。。 三 cos の 

sg 1 32ig 王 3wー9pー8p 王 3k 王 0 た だ し ?1 デ p,9, kz デカ, 9 








(9.28) 
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で ある . 直交 変換 の 結果 の ロー9749 を 調べ る と , 
アア ょ ニテ 4 cos の 9 一 4/。sin 9 
アー 4 sin9 十 4/。cos の 9 


ニテ 4。 cos の 9 一 47。 sin 9 (2. を 元 ヵ , の 





万 ,。 ニー 4。 sin9 十 4/。 cos9 

















5 
太 ぶ ニ 4 計 90290 

ぢ ょ ニテ 4 cos29 一 4。。 sin 20 十 4/。 sin* の 

ア 。。 = 4 sin^9 二 4 。 sin 29 十 4/。 cos2 の 

1 

アテ ぢ 。。 5(4 ぁ ー 4。。) sin 20 十 4。。 cos 20 

で ある . 万 。 を 消去 する た め に , 式 (9.11) と 同じ く 
ー24 
tan 29 = 9 (9.30) 
4 ぁ ー 44。 


が 成り 立た ね ば な ら ず これから 09 の 値 が 決ま る . し か し , 実際 に は tan20 と sin6, 
cos の 9 と の 間 に あ る 次 の 関係 


A 三 ー4。。 


1 


ルー 24 ぁ ー 44。) 


tan 29 三 人 
7 


(9.31) 





入 
の 三 Sn 
gn りー 


の 


2(1+V1 ユ 一 2) 


sin の ニー 





cos の 9 ニ ツ 1 一 sin*9 
が 使え る か ら , 9 を 求め る 必要 は な い . 関数 sgn( ) は 引数 の 正負 の 符号 を 返す 関数 で 
ある . 
行列 4 の 非 対 角 要 素 を 消去 し て いく 順序 は いろ いろ 考え られ , 












































(1) 0 で な い 非 対 角 要 素 を 端 か ら 順 番 に 消去 し て いく . 

(2) 絶対 値 の 大 き な 非 対 角 要 素 か ら 順 番 に 消去 し て いく . 

(3) 絶対 値 が ある 値 ? 以上 の 非 対 角 要 素 を 端 か ら 順 番 に 消去 し , : を 次 第 に 小さ く 
し て いく . 



























































等 が ある . 実例 の プロ グラ ム で は (3) を 使っ て いる . 

区 9.3 に は 3 次 元 檜 円 体面 2z2+ 2 十 3z2 二 0.6zy 十 0.89z 十 zz 三 1 と , 点線 で 座標 
軸 >, ヶ , z が , 実線 で ヤ コ ビ 法 で 求め られ 主軸 , /, < が 示さ れ て いる . 

対称 実行 列 固有 値 問題 の プロ グラ ム (Jacobi.java) の メソ ッ ド (jacobi) と ,. その 説明 
は 以下 の と お り で ある . 
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図 9.3 3 次 元 椿 

















円 体面 と 主軸 . 3 次 元 椿 円 体面 は 2z2<+y2 十 322 十 0.6zy 十 0.89z 十 zz 三 1 で 








ある . 座標 軸 >, ヶ , z が 点線 で .、 ヤ コ ビ 法 で 求め られ た 主軸 z, 7, <” が 実線 で 示さ れ て いる . 
(Z09_03_JacobiDaenMen.java) 








Jacobi.java の メソ ッ ド (jacobi) : 


1 


〈 CO の 喉 の ゆい 


は は は は は は は は は 
の の ロロ 躍 の いい は の 


18 


ト DD ト DD DD い ) DD D DD いい は 
( OO の 喉 の 〇 いい は の 〇 の 〈 ぐ 


pub1ic void jacobi(doubl1e [] [] a, doub1e[] [] s, doub1e[] d, 


こ 
で 


ドー 
^ ヘ 


ここ 
^ へ 


doub]e eps, boo1ean vector) て 
nt n= a.]ength : 
doub1e onm, fnu, t, mu, 1am, omg,。 PP, dd, dD: 
double ap, aq, SD, 8d: 
double x, sin1 , sin2, cos1 , cos2: 
boo1ean ind : 
S を 単位 ベク トル に する 
if (vector) 
for (int i=0: i<n: ++) 
国 遇 ]| 山寺 La⑳ 8 
iiene (Ga ES 本 Sm JR ) 
sli] []]= 0.0: 
s] 曲 ]= 0.0: 
+ 
# 





+ 

非 対 角 ノル ム sqrttsum(i ne ]}) aij^2} の 計算 

onm= 0.0 : 

由 Ona 還 (iii 寺山 三 (5 還 ロ ST 三咲 細 iiEE2H) 議 | 
for (int ]= ュ +1: ]<n: j++) て 

onm= onm+(ali] []] *a[i] []] ) : 

# 

# 

onm= Math .sqrt(onm) /n: 

最後 の 半 値 Enu 

fnu= onm*GDS 

t= onm: 

do { 


1 


5 
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30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 


// 


// 


// 


// 


// 


最初 の 半値 も は 非 対 角 ノル ム の 1/n ずつ 小さ くし , 最後 は 0.99 fnu 
t= t/n: 
ュ f (t < fnu) t= fnu*0O . 99: 
do { 
ind= fa]se : 
for (int q=1: q<n: q++) て 
for (int p=0: p<=q-1: p++) て  // 上 三角 で 処理 
if (Math.abs(a[q] [p]) > t) { // 大 きい 要素 あり 
1nd= true : 
sin の 9, cos6 の 計算 
mu= 0.5*(a[p] [p] -a [q] [g] ) : 
1am= -a[q] [p] : 
omg= 1am/Math . sqrt(1am*]am+mu*mn ) : 
if (mu < 0.0) て 
oOmg= -omg: 
+ 
Sin1= omg/Math . sqrt(2*(1+Math . sqrt(1-omg*omg) ) ) : 
cos1= Math.sqrt(1-sin1*sin1) : 
Sin2= sin1*sin1 : 





COS2= cos1*cos1 : 
pp= a[p] [p] : 
qq= a[q] [q] : 
qp= 2.0*a[lq] [p] *sin1*cos1: 
a の p,q 行 p,q 列 の 変換 
for (int k=0: k<n: k++) 
1f (k==p || k==q) continue: 
ap= alpl[k] : 
aq= algl[k] : 
a [p] [k] = ap*cos1-aq*sin1 : 
a[q] [k] = ap*sin1+aq*cos1: 
a[k] [p]= a[p] [k] : 
a[k] [q]= a[q] [k] : 
+ 
a の 枢軸 の 計算 
a [p] [p] = pp*cos2-qp+qq*S1n2: 
a[q] [q] = pp*sin2+qp+qq*co82: 
alq] [p]= alp] [qg]= 0.0: 
sg の 計算 
if (vector) て 
for (int k=0: k<n: k++) 
sp= slk][p] : 
sd= Ss[kl[q] : 
8 [k] [p] = sp*cos1-sq*s1n1 : 
8 [k] [q] = sp*sin1+sq*cos1 : 


} whi1e (ind) : 
 whi1e (t >= fnu) : 


81 


// 





9.2 固有 値 と 固有 ベク トル 153 

















a の 対 角 要 素 が 固有 値 に な っ て いる か ら d に 代入 する 


for (int i=0: 1<n: ++) 


+ 


+ 


20. 


al 同 | 中 a 同 | 較 8 








L1, 2 て 85: メソ ッ ド jacobi の 定義 で ある . 固有 値 問 題 の し 式 は 49 = 9 の で あり 
引数 の a は 行列 4、 s は 固有 ベク トル が 縦 ペ ベク トル と な っ て いる 行列 5 d は 廿 
値 の ベク トル d で ある . eps は 行列 4 を 対 角 化 し て いく と き の 非 対 角 了 要素 の 
相対 精度 の 関 値 。 vector は 固有 ベク トル も 求め る と き は true を 指定 し , 求め な 
いと き は false を 指定 する boolean で ある . 

L9 て 17: 引数 vector が true な ら , 固有 ベク トル を 求め て いく 行列 9 を 単位 行列 
と する . 

L19 て 25: 非 対 角 要 素 の 較 値 を 決め る た め に , 非 対 素 全 体 の ノル ム (大 き さ ) 
を 使っ て onm を 求め る . 
L27: 最終 的 な 関 値 の 値 を fnu に 指定 する . 

L28: 途中 の 関 値 t の 初期 値 と し て , 先 の ノル ム onm を 指定 する 

L29 て 80: 関 値 t を 1/n ずつ 小さ く し て , fnu より 小さ く な る まで 繰り 返す ルー 
プ で ある . 

L32: 最後 の も が 小さ く な りす ぎ な いよ うに し て いる . 

L33 て 79: すべ て の 非 対 角 要素 を 半 値 t よ り 小 さく する ルー プ で ある 

L34: 今回 の ルー プ の 処理 で .。 すべ て の 非 対 角 要素 が 関 値 t より 小さ く な っ て い 
た ら ル ー プ を 抜け る た め の フ ラグ ind を false に し て お く . 
L35, 36 て 77, 78: 上 三角 行列 部 分 で まわ す た め の ルー プ で ある . 
L37 て 76: 関 値 よ り 大 きい 非 対 角 要 素 が 見 つか っ た ら 処 理 を する 
L38: フラ グ ind を true に する . 

L40 て 47: 式 (9.31) に よる sin の, cos の 9 の 計算 

L48 て 66: 式 (9.29) に よる 変換 を 行う . 

L68 て 75: 引数 vector が trune な ら , 固有 ベク トル に つい て も 変換 を 
L76: 関 値 より 大 きい 非 対 角 要素 が 見 つけ た と き の 処 理 の 終了 . 
L77, 78: 上 三角 行列 部 分 で まわ す た め の ルー プ の 終端 

L79: すべ て の 非 対 角 要 素 が 関 値 t よ り 小 さく な っ て いた ら ル ー プ を 抜け る . 
L80: すべ て の 非 対 角 要素 が 最終 的 な 関 値 の nu より 小さ く な っ て いた ら ル ー プ 
を 抜け る . 

L82 て 84: a の 対 角 要 素 が 固有 値 に な っ て いる か ら d に 代入 する 


















































































































































































































































ウ 。 


































































































9.2.4 累乗 法 


次 元 の 大 き な 行 列 を 扱う が , 絶対 値 が 大 き な 固 有 値 を 少し だ け 必 要 と する 場合 に は , 




















累乗 法 (power method) の ほう が 有効 な 場合 が ある . 4 を ヵ 次 元 実 対称 行 列 と し ,. まだ 





未知 で ある が ヵ 個 の 固有 値 は 絶対 値 の 大 きい 順 |2」| > > 12。| の 本 … , の で あり , 
対応 する 固有 ベク トル は s」,…,s。 で ある と する . 
ある ベク トル s09) ニ >_ois: を 選び , これ に 左 か ら 4 を 掛け る と , 
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s1) 二 4s(0) ニ 2 oz 人 4s。 = > し Oz の 8。 (9.32) 
1 


? 王 1 


で ある . 左 か ら 4 を 繰り 返し 掛け る と , 


人 雪 の 
s(?) 9 oz の Ps。 ニ の (… 十 2 Qi 3) ) (9.33) 
と な り , ゎ が 大 きく な る と , 
s(⑦) ニ ai の fg (9.34) 


に 近づく . この こと は , 絶対 値 が 最大 の 4 の 固有 値 に 対応 する 固有 ベク トル の 方 向 に 
収束 し て いく こと を 示し て いる . 繰り 返し の た びに ベク トル s ぐ ⑫ を 規格 化し て お け ば 
収束 し た と き に は , 

















4s⑦) Zs⑦ (9.35) 


が 成り 立っ て いる か ら , g@ は 固有 値 で も や り ., その と き の s は 固有 ベク トル と な っ て い 
る . この よう に , 4 を 繰り 返し 左 か ら 掛 け て いく の で , この 方 法 を 累乗 法 と いう . 
その 固有 値 と 固有 ベク トル を , それ ぞ れ 必 , si と し て ., 


























4。 ニ オー7srs+7 (9.36) 











に 累乗 法 を 適用 する と , 








45s1 三 4s1 喧 gs1817 s+ 三 の 1S1 紀 d」81 xX1=0 
(9.37) 

45si 三 Si 喧 の s1S17 si 三 の ,Si ー の Sri X0 ニ の ,8i 
で ある か ら , 2 番目 に 絶対 値 の 大 き な 固 有 値 。 と 固有 ベク トル s。 が 求め られ る . si7 
は si の 転 置 ベ クト ル で あり , 列 ベ クト ル と 行 ベ クト ル の 積 sisj7 は ( ヵ x ヵ ) の 行列 に 
な る . また , si は 規格 直交 化 さ れ た 固有 ベク トル で ある か ら , 式 (9.17) の 直交 規格 関 
NNWRRRRM Et 3 番目 以降 の 固有 値 と 固有 ベク トル も 同様 に し て 
求め られ る . し か し , | 二 | の 値 が 小さ い 場 合 な ど で は 収束 が 遅く 、 また, すべ て の 対 


角 要 素 が 小さ い 場 合 に 人 0 と も ある . その よう な 場合 に は , 行列 の 対 角 要 
素 を 一 定 の 値 > だ けず らし て 


































































































4 ルー 4 十 c7 (9.38) 














と すれ ば , 速やか に 収束 させ られ る こと が ある . その 場合 の 真 の 固有 値 は = み ーc 
で ある . 

絶対 値 の 小さ な 固有 値 か ら 求 め る に は , 行列 式 の 逆行 列 4~+ に 累乗 法 を 当て は め れ 
ば , その 固有 値 の 逆数 が 求め る 固有 値 で ある . 

プロ グラ ム (Bigen_Power.java) の メソ ッ ド (eigen_Power) と . その 説明 は 以下 の と お 
り で ある . 
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Eigen_Power.java の メソ ッ ド (eigen_Power) : 


1 pub1ic void eigen_Power(doub1e[] [] a, doub1e[][] s, doub1e[] d, 
nt itr) 


タ int n= a.1ength: 

に 1nt m= d.1ength: 

4 doub]e dmax: 

軸 doub]e[] s0= new doub1e [n] : 

6 8s0[0]= 1.0: 

7 for (int =1: 1<n: 1 ユ ++) て 

8 s0[i]= 0.0: 

9 + 

10 for (int k=O: k<m: k++) て 

ii dmax= eigen_Max_Power(a, 80, itr) : 
12 d[k]= dmax: 

13 for (int 1=0: 1<nm: 1++) て 

14 s[i] [k]= s0[i]: 

5 + 

16 a= mat_Sub(a, c_Mu1(dmax, direct_Product(s0, s0))) 
17 が 

iNS3 jj 











1. L1 て 18: メソ ッ ド eigen_Power の 定義 で ある . 固有 値 問題 の し 式 は 45 = 9D で あ 
り , 引数 の a は 行列 4、s は 固有 ベク トル が 縦 ベ クト ル と な っ て いる 行列 5、d 
は 固有 値 の ベク トル d で ある . itr は 収束 し な い 場 合 の 反復 回 数 の 上 限 で ある . 

































































ロ 



























































L2: n は 行列 の 次 元 数 . 
L3: m は 求め る 固有 値 の 数 で あり , 大 きい ほう の 7 ヵ 個 の 固有 値 が 求め られ る 
L4: 求め る 最大 固有 値 を 代入 する 変数 


















































L5 て 9: s0 は 最大 固有 値 の 固有 ベク トル の 配列 で あり , 初期 化し て お く . 
L10: 求め る 固有 値 の 数 m だ け ル ー プ を まわ す . 
L11: 最大 固有 値 を 求め る メソ ッ ド eigen_Max_Power を 呼ぶ . 引数 は 行列 a, 固 
有 ベ クト ル s0, 反復 回 数 の 上 限 itr で ある . 戻り 値 の 固有 値 が dmax に 代入 さ 
れる . 
L12 て 15: 固有 値 と 固有 ベク トル を , それ ぞ れ 配列 q と s に 代入 する . 
L16: 式 (9.36) の 処理 を 行い 次 の 最大 固有 値 を 求め ある た め の 行 列 a を 作る . こ 
の クラ ス に は , 行列 の 引き 人 算 mat_Sub, 数 を 行列 に 掛け る c_Mul と ベク トル の 
直 積 direct_Product が メソ ッ ド と し て 用 意 き され て いる . 
10. L18: 計算 結果 の 固有 値 と 固有 ベク トル は 引数 の 配列 d と s で 戻さ れる . 
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プロ グラ ム (Higen_Power.java) の メソ ッ ド (eigen_Max_Power) と , その 説明 は 以下 の 
と お り で ある . 


Eigen_Power.java の メソ ッ ド (eigen_Max_Power) : 


il pub1ic doub1e eigen_Max_Power(double [] [] a, doub1e[] s0, 


bag 衣 i 可 9) エ 
2 int n= a.1ength: 
3 doub]e[] sw= new doub1e [n] : 


4 int m= 0: 
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5 doubl1e dmax= 0.0: 

6 doub1]e di: 

放 doubl1e snorm= 0.0: 

8 Snorm= dot_Product(s0, s0O) : 

9 Snorm= Math.sqrt(snorm) : 

10 for (int =O: 1i<n: ユ ++) て 

11 S0[i] /= snorm: 

12 + 

13 do て 

14 m+: 

中 5 Sw= mat_ Mu]1(a, s0O): 

16 doub]e swsw= dot_Product(sw, 8w) : 
17 doub]e sOsw= dot_Product(s0, sw) : 
18 d= swsw/sO0sm: 

19 if (Math.abs(dmax-d) く 1 .0e-6) break: 
20 dmax= d: 

21 doub1e swnorm= Math.sqrt(SVSv) : 
22 for (int i=0: 1<n: ュ ++) 

28) s0 [ii] = sw[i] /swnorm : 

24 + 

25 ナ whi1e (m<itr) : 

26 if (m>=itr) System.out.print]n("ERRUR No Convergence , m= "+m): 
27 return dmax : 

39  # 





1. L1 へ 28: メソ ッ ド eigen_Max_Power の 定義 で ある . 固有 値 問題 の 式 は 45 = 5 カ 

で あり , 引数 の a は 行列 4, s0 は 求め る 最大 固有 値 の た め の 固 有 ベ クト ル で あ 

る . 固有 値 は 戻り 値 で 返さ れる . 引数 の itr は 収束 し な い 場 合 の 反復 回 数 の 上 限 

で ある . 

L2: n は 行列 の 次 元 数 で ある . 

L3: sw は 反復 する と き の 新 し い 固 有 べ ベク トル の 配列 で ある . 

L4: m は 反復 回 数 の カウ ンタ で ゼロ に 初期 化す る . 

L7 て 12: ベク トル s0 の ノル ム を 1 に 規格 化す る . 

L8: この クラ ス に ある メソ ッ ド dot_Product で あり , 引数 の 2 個 の ベク トル の 

内 積 を 返す . 

7. L13 て 25: 求め る 固有 値 が 収束 する まで 4 の 累乗 (L15) の ルー プ を まわ す . 

8. L14: カウ ンタ に 1 を 加え る . 

9. L15 て 18: 式 (9.35) の d を 求め る . 

10. L15: この クラ ス に ある メソ ッ ド mat_Mul で あり , 引数 の 行列 と ベク トル の 積 の 
ベク トル を 返す . 

11. L19: 収束 し て いた ら ル ー プ を 終了 する . 

12. L20 へ 24: まだ , 収束 し て いな か っ た ら , dmax と 新しい s0 を 準備 する . 

13. L25, 26: 反復 回 数 が 上 限 に 達し た ら ル ー プ を 終了 し , メッ セー ジ を 出力 する . 

14. L27: 固有 値 を 戻り 値 と し て 返す . 
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の よら の らい ゆ 
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9.2.5 QR 法 
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ヤ コ ビ 法 は 単純 明快 で ある が , 処理 効率 は あま り 良 いと は いえ ず , > 10 に な る と 
実用 的 で な く な り , これ まで に 述べ た 他 の 方 法 と と も に 古典 的 方 法 と いわ れる こと も 
ある . ヤ コ ビ 法 で 非 対 角 要 素 を ゼロ に し て いく 過程 は , 値 の 大 きい 要素 か ら ゼ ロ に し 
て いく が , 一 度 ゼ ロ に し た 要素 も 他 の 要素 を ゼロ に する 過程 で 再び 有限 の 値 を も つよ 
うに な り , あたかも モグ ラ H 叩 き を する 感 が ある . 






























































現在 ヵ が 大 きい 固有 値 問 題 で は , 初め の 行列 の 非 対 角 要素 に ゼロ が 少な い 密 行列 の 


場合 や 、 ゼロ が 多い 疎 行列 の 場合 な ど で , それ ぞ れ 有利 な 方 法 が 考え られ て いる . も 


ちろ ん , ベク トル プロ セッ サ を 使わ けれ ば な ら な い が , 








5 万 次 元 で 非 零 行列 要素 数 が 





5000 万 の 行列 の 対 角 化 が 、 ラ ンチ ョ ス 法 な ど に よっ て 行わ れ て いる 
これ か ら 述 べ る 方 法 は , 密 行 列 に 使え る 方 法 で あり , まず ,. ハウ ス ホ ー ル ダー 法 を 











使っ て , 対称 行列 の 場合 に は 3 








対 角 行 列 に , 非対称 行列 の 場合 に は 上 ハッ セン ベル 


グ 行 列 に 変換 し , その 後 , QR 法 に よっ て 対 角 行 列 , あ る い は 上 3 角 行 列 を 求め る 方 


法 で ある . 

















ば , 非常 に 効率 が 良い と いえ る . 





次 の プロ グラ ム は , 固有 値 を 求め る だ け な の で , 
き な 問 題 を 扱う 場合 に は , 効率 が 





ウェ ア を 利用 し て 頂き た い |20]I21]. 


ハウ ス ホ ー ル ダー 法 


最初 の ヵ 次 元 行列 














@11 の 12 
G21 022 
4o 三 | gsi 982 
の ヵ 1 0 ヵ 2 
に ハウ ス ホ ー ル ダー 法 を 適用 

















1 の 
2 
3 


27777】 


ハウ ス ホ ー ル ダー 法 の 過程 は モグ ラ 叩 き と は 異な り , 各 列 に つい て 
り 処理 すれ ば 済み , QR 法 の 過程 で は 繰り 返し が 行わ れる が , ヤ コ 























通 
ビ 法 な ど に 比べ れ 




















固有 ベク トル を 必要 と し た り , 大 
良く な る よう に 研究 され て いる パッ ケー ジ の ソフ ト 





(9.39) 


し て , 上 ハッ セン ベル ダグ 行列 に する . その た め に , まず 
4 の 第 1 列 の 第 3 行 目 か ら 下 が ゼロ の 行列 


1 
2 ヵ 
3 


の ヵ の 


に 変換 する 直交 変換 の こと を 考え る . その よう な 














ウ ( を 。 


ー チ ュー エー 


中 父 




















(9.40) 


変換 は 対称 な 直交 行列 9」 を 使 
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4。 震 岳 45 
1 0 …. 0 1 ーー dm 1 0 …: 0 
還 0 sz2 …・ 52 21 - …・ 02 ヵ 0 s22 …・| 52% 
0 522 0 8 の 才 @ ヵ 1 員 還 語 2777) 0 972 9777 
1 0 am 7 1 0 
0 (2 x②) 4②2) 0 g(22) 
(922.xG2))7 
22 21 22 22 22 
4 
(9.41) 
と な る か ら , 
の 1 
0 
y(2D  g(22x2D (9.42) 
0 





と な る よう に 5 を 作れ ば よい . た だ し , 422) は 行列 4。 の 要素 gy> を 含め た 右 下 の 
小 行 列 で あり , 52? ゃ 同様 で ある . また , 


導 





21 G12 
xD 呈 5 xO う 三 (9.43) 
G ヵ 1 1 る 


で ある . 
式 (9.42) を 満た す 9」 は 次 の よう に 作れ ば よい . 簡単 化 の た め に 式 (9.42) を 








ァ ニ Sx (9.44) 








の よう に 書き 換え る . ベク トル x と y の 長 さ は 等 し くし て お く . ここ で , 








2 
9= イ ーー ニー ば ーy)(xーy)7 (9.45) 


と 置い て みる . する と , 





9x-y = ( ューPeーye-y7] テ ーッ 





(9.46) 





ky ば ー の ( (x”ーy”)(xーy) 十 2(x”ーy”)x) 








2 y)(x" メオ デマ ーy テー タ "Y) 


三 0 
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と な り , 確か に 式 (9.44) が 成り 立っ て いる . 式 (9.45) の 転 置 を と る と 9 に 戻る の で 
57 ニ 9@ で あり, また , 

















gg7 ( ーー ィ yp y)(x y ( ーー ィ yp y)(x が 
































4 
区 区 
隔 き 9 y)(xー ツ ) 
4 アア ア 
キ 文 文 文 文 
還っ y)(xーy)”(xーy)( メ ーT) 
記 。 半 紀 閲 0 
(9.47) 
で ある か ら , 9 は 対称 な 直交 行列 で ある . 以上 の こと を 式 (9.42) に 適用 する と , 
@21 一 の 1 
d2D x20 1) (9.48) 
7 ヵ 1 
で ある か ら , 
22) _ 2 
5 ーー (9.49) 
と な る . g は xi) と yr の 長 さ が 等 し いと いう 条件 か ら , gi = 土 ,| 》 gi』 で ある 


が , 符号 は xy| が 小さ く な っ て 桁 落 ち 誤 差 が 生じ な いよ うに , gs と 異 符号 の も の 
を 使う . 

これ で , 4 の 第 1 列 の 第 3 行 目 か ら 下 が ゼロ と な っ た 行列 4.」 が 求め られ た が , 続 
いて 第 2 列 の 第 4 行 目 か ら 下 を ゼロ と する 行列 9。 で 直交 変換 を 行い 9,_ ぅ まで 繰り 
返せ ば よい . そこ で , 












































一 2 
5=|[% (9.50) 
2 一 1 


と 置け ば . 上 ハッ セン ベル ダグ 行列 は 





4。 ゥ テニ 56_」145 (9.51) 
で ある . 
式 (9.45) に お いて , 
d ニ (メー リザ )/kー 絢 (9.52) 
と し , 1 回 の 直交 変換 を 記す と, 
549 = (7ー2dd7)4(7 - 2dd7) 
= 4ー2dd74-24dd7 二 4dd7 4dd7 (9.53) 





= 4-2(4qd- qqd74d)d7 - 2d(d7 4 ー d7 4dd7) 
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で ある . ブロ グラ ム の 際 
必要 が ある . 


QR 法 
上 ハッ セン ベル ダグ 行列 











に は , で きる だ け 「 行 列 掛け る 行列 」 で 括 ら な いよ うに する 





4 が で きた の で , 次 は , QR 法 に よっ て 上 三角 行列 に する . 


変換 を 行う 直交 行列 と し て , ギブ ンス の 直交 行列 











1 0 
cos 。 sin 旨 0 
4 一 9.54 
ーsin の , cos の 0 
0 0 0 ー…・ 1 


を 使う ただし, 0, は ?= ニ 1 て (ー1) で ある . ヤ コ ビ 法 で は , 直交 変換 後 の 行列 











57 45 の 該当 する 非 対 角 








要素 を ゼロ に し た が , それ で は すでに ゼロ に な っ て いる 他 の 











非 対 角 要素 の 値 が 復活 す 
751 三 0 と な る よう に 91 


導 











る の で , 収束 が 遅かっ た . ここ で は , まず 4 = 刀 」 と し て 
を 決め る . この 操作 は , 








郁 ーー の ⑫4 
cos9」 sim … 0 0 @ の 1 の 12 …・ dmー1 dp 
ーsin の の cos の の …| 0 0 @21 。 092 …・ 09 ヵ 1 0 の 2 
一 0 @32 。 "・ 0 の 3 ヵ ー1 03 ヵ 
0 0 
0 0 0 0 G ヵ カー1 の 
1 1 1 1 
Pi 09 9 バ り 
1 1 1 
0 99 間 Pe 
ー 0 32 3 ヵ ー1 3 ヵ 
0 0 G ヵ カー1 の 
(9.55) 
で ある . 変換 され る 要素 を 具体 的 に 書く と , 
ga の 三 Gi COs 7] 十 go sin 信 
の の デーgii sin 9」 十 og21 cos の 」 三 0 
1 (9.56) 
0 三 g1) cos 十 g27sim7 (7 三 2。…・, が 一 1) 
の のり ニー) sin の 十 gp7 Cos 人 の (7 =2,…・,2 一 1) 


で あり , 第 1.2 行 の み が 変 更 さ れる . この 式 の 最初 の 2 式 と の , に 対す る ピタ ゴラス の 


定理 か ら , 





1①) 2 2 
むー V 十 の 51 


cos の 」 三 gi/g 


sin の 」 三 gr/g や 


(9.57) 
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が 定まる . 同様 な こと を Q。_」 まで 行う と , 


711 712  「「 ーー 71 カー1 7 
0 。 722 …| 72m- ニ 1 72p 

尋 三 ⑦ ヵ _ ュ 旨 ⑦3 の 14 一 0 0 パー 73 ヵ ー1 73 (9.58) 
0 0 …・ 0 の れ 











は 上 三角 行列 に な る . ここ で , 後 の 便宜 の た め に の =(O 〇 ,_」… の 3 の 1)-| と 置く と 














アー ニ 0-「4 つ 4 オー (9.59) 




















と な る . この よう に 4 を 直交 行列 O と 上 三角 行列 選 に 分 解す る こと を QR 分 解 と 
いう . 
次 に 4 の 0 の に よる 直交 変換 を 作る と 


/ 1 
1 2 胃 Imー1 
上 7 2 
722 Sin 9 G22 半 "2nー MM 
4 ニー+40 = OO = 1 
Oo-!40 = Ro 0 zasm あ 引っ 8 
0 0 ーー 7 Sin の ュー の 5。 


(9.60) 





と な っ て 上 ハッ セン ベル ダグ 行列 が 復活 する . し か し , 復活 し た 各 要 素 と も |sin| <1 
が 掛か っ て いる か ら , 処理 の た びに 小さ く な っ て いく で あろ うこ と が わか る . 

も し, 行列 4 の 要素 c。。_+) が ゼロ に ( 団 値 より 小さ く ) な っ た ら , 次 は , 行列 4 
の 左上 の ヵ ー1 次 の 小 行列 で の 処理 を すれ ば よく , 順次 ,、 次 数 が 減っ て 最後 に 左上 の 
2 次 の 小 行列 を 処理 し て 終了 する . 

プロ グラ ム (Higen_QR.java) の メソ ッ ド (house) と 、 そ の 解説 は 以下 の と お り で あ 
る . 









































Eigen_QR.java の メソ ッ ド (house) : 


1 ryvoid house(doub1e [] [] a, doub1e eps) { 


2 int n= a.1ength: 

思 | double w, Sigma, norm, Sum, dtad : 
4 doub1e[] x= ne doub1e [n] : 
doub]e[] adq= new doub1e [n] : 

6 doub]e[] qta= new doub1e [n] : 

7 1nt ip= 0: 

8 

9 for (int k=O: k<n-2: k++) 

10 w= 0.0: 

11 for (int i=k+1: i<n: i++) 人 { // rk 列 の kr1 行 以下 で 最大 を 探す . 
1 if (Math.abs(a[i][k]) > vw) t{ 
13 w = Math.abs(a[i] [k] ) : 

14 1p = ュ : 


15 + 
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16 か 

17 if (ip != k+1) { // ピボット が kr+1 行 で な か っ た ら 入 れ 替 える 
18 for (int ]=0: ]<n: ]++) て 

19 w= a[k+1] []] : 

20 a[k+1] [= a[ip] [] : 

21 alip] = wi: 

22 + 

8 for (int ]=0: ]<n: ]++) て 

24 w= a[]j] [k+1] : 

25 aj] [k+1]= a[j] [ip] : 

26 alj] [ip]= wi 

27 + 

28 + 

29 

30 for (int =O: 1<=k: ユ ++) 

31 x[i]= 0.0: 

32 + 

33 

34 for (int 1=k+1: 1<n: ユ ++) 

35 x[li]= a[i] [k] : 

36 が 

37 if (Math.abs(x [k+1] )<eps) continue: 
38 Sum= 0.0: 

39 for (int =k+1: 1<n: ユ ++) 

40 Sum += x[i] *x[i] : 

41 + 

42 Sigma= -Math.sqrt(sum)*x[k+1] /Math . abs(x [k+1] ) : 
43 x[k+1] -= sigma: 

44 norm= Math.sqrt(-2*s1gma*x [k+1] ) : 
45 for (int =k+1: 1<nm: ユ ++) 

46 x[1] /= norm: 

47 + 

48 

49 for (int =0: 1<n: ユ ++) て 

50 ad [1]= dta[i]= 0.0: 

51 for (int ]=k+1: ]<n: j++) て 

52 ad[i] += ali][]*x[]] : 

53 dta[i] += x[j]*a[]] [ ュ ] : 

54 肌 

55 + 

56 dtad= 0.0: 

57 for (int =k+1: 1<n: ユ ++) { 

58 dtad += ad[i] *x[i] : 

59 』 

60 for (int =O: 1<n: ユ ++) て 

61 ad [1]= 2*(ad[i] - x[i]*dtad) : 
62 dta [1i] = 2*(dta[i] - dtad*#x[i] ) : 
63 が 

64 for (int =O: 1<n: 1++) て 

65 for (int ]=0: ]<n: ]++) { 


66 ali] []] -= (ad[i] *x[]]+x[i] *dtal]] ) : 


67 
68 
69 
70 





9.2 固有 値 と 固有 ベク トル 163 

















1. L1 へ て 70: プロ グラ ム Eigen_QR.java の メソ ッ ド house の 定義 で ある . 引数 の a 
は 上 ハッ セン ベル ダグ 行列 化す る 元 の 行列 で あり , eps は ゼロ に する 要素 の 値 の 関 


値 で ある . 


2. L4: x は 最初 は 式 (9.44) の x で ある が , L35 で 式 (9.48) の q の 一 般 型 を 規格 化 


し た も の と な る . 


L30 て 36: 式 (9.43 


L38 て 47: 式 (9.48 
L49 て 68: 式 (9.53 


の 只 選 の 下 9 


プロ グラ ム (Eigen_QR.java 


ある . 














の x ぐ 0 を 作る . 


L5, 6: 4d, d4 な ど 途 中 の 作業 に 使う 配列 で ある . 
L9 へ て 70: 列 k に 関す る ルー プ で ある . 
L10 て 28: ピボット 選択 を する . 











L37: すでに 小さ か っ た ら ル ー プ を 先 に 進め る . 











の d の 一 般 型 を 規格 
の 直交 変換 を 行う . 





し た も の を 作る 


の メソ ッ ド (eigen_QR) と , その 解説 は 以下 の と お り で 


Eigen_QR.java の メソ ッ ド (eigen_QR) : 


1 pub1ic double[] eigen_QR(doub1e[] [] a, doub1e eps) て 


nt n= a.]ength : 


doubl1e[] d= ne doub1e [n] : 
doub1e [] [] q= new doub1e [n] [n] : 
doubl1e[] w= ne doub1e [n] : 
doub]e sum1 , sum2, Ma: 

doub]e sint , cost: 


house(a, eDS) : 
nt m= nij 
while (ml=1) { 


if (Math.abs(a[m-1] [m-2] ) <eps) 


m= m-1: 
COnt1mUG : 


+ 


for (int i=0: 1i<n: 1++) て 
for (int ]=0: ]j<n: j++) て 
qli] []= 0.0: 


+ 


qi] = 1.0: 


+ 


for (int 1i=0: 1<m-1: ュ ++) て 
sum1= Math.sqrt(a[i] [i] *a[i] [1] +a[i+1] [1] *a[i+1] [i] ) : 
if (Math.abs(sum1)<eps) t 


S1nt= 0.0: 
cost= 0.0: 
} el1se { 
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@ 


+ 


9 - 還 2R だ に 


m ー 
m の 


Sint= a[i+1] [1] /sum1 : 
cost= al[i] [1i] /sum1: 

+ 

for (int ]j= ュ +1: <m: ]++) て 
Sum2= a[i] []] *cost+a[i+1] []] *s1nt: 
ali+1] [= -a[i] []]*sint+a[i+1] []] *cost: 
ali] [= sum2: 

+ 

ali+1] [ ュ ]= 0.0: 

a[i] []= sum1: 

for (int ]j=0: <m: j++) て 
Sum2= q[]] [1]*cost+q[]] [1+1] *sint: 
q[] [1i+1]= -q[]] [1] *sint+q[]] [1+1] *cost: 
q] 昌 ]= sum2: 

+ 

# 


for (int 1=O: 1<m: 1+++) て 
for (int k=i: k<m: kk++) { 
wlk]= al[i] [k] : 
+ 
for (int ]=0: ]<m: ]++) { 
Sum1= 0.0: 
for (int k= ュ 1: k<m: kk++) 
Sum1 += wlk]*q[k][]] : 
+ 
ali] = sum1: 
+ 
か 
for (int i=0: 1<m: 1++) 
d[i]= ai] は ] : 


ME IO 


L1 て 61: プロ グラ ム Eigen_QR.java の メソ ッ ド eigen_QR の 定義 で ある . 引数 の 
a は 固有 値 を 求め る 行列 で あり , eps は ゼロ に する 要素 の 値 の 関 値 で ある . 戻り 
値 は 固有 値 で ある . 

L3: 戻り 値 の 固有 値 の 配列 で ある . 

L8: メソ ッ ド house を 呼ん で , a を 上 ハッ セン ベル ダグ 行 列 に する . 

L9: 最後 の alm-1]In-2] か ら 処 理 を 始め る た め に m に n を 代入 する 

L11 て 14: すでに 小さ か っ た ら m を 1 減ら す . 

L15 て 20: n 次 元 の 単位 行列 q を 作る . 

L21 て 42: 式 (9.55) の 処理 を 0 列 か ら m-1 列 ま で 繰り 返す . 

L22 て 29: 式 (9.57) の 計算 を する . 

L30 て 36: 式 (9.56) の 計算 を する . 

L37 て 41: O を 作る . 

L44 ぐ て 55: 式 (9.60) の 計算 を する . 
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求め な さい . 


忌 で ト DO ビ 
上 で DD も 










































































9.1| 次 の 行列 の 固有 値 と 固有 ベク トル を ヤ コ ビ 法 を 使う JacobiTest.java を 使っ て 














4 
4 
4 
4 

加 有 値 固有 ベク トル 

ー0.29432 0.276677 一 0.66335 0.650424 0.24566 
12.86208 0.410342 0.442245 0.508532 0.614356 
ー0.51464 | 一 0.51437 0.485103 0.541978 0.45426 
ー2.05311 | 一 0.70034 0.35923 0.156851 0.596539 
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フー リエ 級数 と フー リエ 変換 





























トン の 補間 公式 や ラグ ラン ジェ の 補間 公式 .、 ある い は 





4 








チェ ビシ ェ フ 近似 は , 












































べき 級数 展開 の 低 次 の 数 項 を 使う も の で あっ た が , 周 


期 的 な 性 質 の ある デー タ の 場合 


に は , 三角 関数 で 級数 











展開 する フー リエ 級数 が 使わ れる . 


この 場合 は , 関数 を 少数 の 























低 次 の 項 だ け で は 良く 近似 する こと が 不可 能 な こと が 多く , 近似 の た め に 使わ れる と 
いう こと は あま りな い が , 与え られ た シグ ナル な どの 関数 に . どの よう な 周期 の 波 が 





どの 程度 混ざっ て いる か を 調べ る スペ クト ル 解 析 な ど に よく 使わ れる 
フー リエ 解析 と も いわ れる . また , 量子 力学 の 分 野 で は , 電子 の 波動 関数 の フ 
変換 で ある 運動 量 波動 関数 な ど が , 実 空間 で の 関数 同様 に 重要 な 概念 と な っ て いる . 
一 般 的 に は , 与え られ る デー タ は 解析 的 な 関数 /(c) で は な く , 離散 的 な 数 値 デ ー タ 


この 場合 は , 














リエ 


























































































































げ (z。) で ある 場合 が 多く , その 場合 に は 変数 z の 範囲 は 有限 で あり , フー リエ 変換 の 
積分 領域 も 有限 と な る . この 場合 の フー リエ 変換 は , 離散 フー リエ 変換 (DFT) と いわ 
れる . 
10.1 フー リエ 級数 
まず , 簡単 な 例 と し て , 周期 関数 で ある 鍋 波 と 短 形 波 の 場合 を 取り 上 げ る . 図 10.1 
は 周期 関数 で ある 鍋 波 (実線 ) の フー リエ 級数 展開 の 収束 の 様子 を 志 し て いる . 旬 波 と 
その フー リエ 展開 は 
ES (-37 < こく ー7) 
7 旭 
= 0 たま ー 2 ー ィ を 一 1 エー 
げ () = (7 < 放 く ア ) 2 1) Sin ん (10.1) 


( ァ ー 27) 





(7 < ヶ く 377) 
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| 
lZ ル / ビ 








10.1 鍋 波 (実線 ) の フー リエ 級数 展開 . 左上 は 第 1 項 smz の み で あり , 左 中 , 左下 , 
右上 な どの 順に 項 の 数 が 1 項 ず つ 増 加 し て いる . 右 下 は 第 6 項 ま で で ある . 








で ある . 図 の 左上 は 第 1 項 inz の み で あり , 左 中 左下 有 有 上 な どの 順に 項 の 数 が 
1 項 ず つ 増 加 し て いる . 
この 場合 は , 元 の 関数 ( 鎧 波 ) が 奇 関数 で ある か ら , 級数 は sin 関数 の み で あり , cos 
関数 は 含ま れ て いな い . 
この 場合 は , 元 の 関数 ( 逢 形 波 ) が 偶 関 数 で ある か ら , 級数 は cos 関数 の み で あり , 
sin 関数 は 含ま れ て いな い . その 上 , 元 の 関数 は 1 周期 が 2 ィ x で あり , 値 が 1 と -1 で 
あぁ ある 領域 が * ずつ で 等 し いか ら , 1 周期 の 中 に 波数 が 偶数 個 あ る cos2z の 項 の フー 
リエ 係数 は ゼロ と な り ,. それ ら の 項 は 現れ て こない . 
蔽 10.2 は 周期 関数 で ある 知 形 波 (実線 ) の フー リエ 級数 展開 の 収束 の 様子 を 示し て い 
る . 短 形 波 と その フー リエ 展開 は 




















ーー や > 




































































図 10.2 短 形 波 (実線 ) の フー リエ 級数 展開 . 左上 は 第 1 項 osx の み で あり 」 左 中 , 左下 , 
右上 な どの 順に 項 の 数 が 1 項 ず つ 増 加 し て いる . 右 下 は 第 6 項 ま で で ある . 
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77 7 
= 人 に 0 
(-7 <Z< っ) っ さ タ く 
7 7 旭 
三 0 人 
MO (⑦ーー ち 5 う ) 
旭 1 
ツー 
(に てき る) 
(-1) に + cos(2 ん 一 1)z 
el 2 一 1 














で ある . 図 の 左上 は 第 1 項 cosg の み で あり , 左 H 
// 


(10.2) 





















































左下 ,、 有 有 上 な どの 順に 項 の 数 が 




















1 項 ずつ 増加 し て いる . 
10.1.1 三角 関数 に よる 級数 展開 
周期 が 2r の 関数 /(y) の 値 が 等 間隔 の ヵ 点 ー ジ 2 け ー0.1… カー1) に つい 
て 与え られ て いる と き , この ヵ 点 を 通る 補間 式 は , 低 次 の ヵ 個 の 三角 関数 を 使っ て 
7 一 1 
テ 十 > (qz cos z 十 6。 sin ) 十 ぞ CO8 772 の 
を =1 
(が = > ん が 偶数 の 場合) 
げ (?) = | (10.3) 
な 十 > し (gz cos z 十 6 sin Z) 
を =1 
(= テ 圭 す 。 が 奇数 の 場合 ) 


2 


7 一 1 ーー1 7 一 1 
ep = と ) 
0 7ー0 ょ 1 
7 
三 ーー@ 
0 り 
ター1 
> cos z』 が (7) 
7 王 0 
ーー1 同 7 一 
王 > し COS ん 罰 十 
7ー0 1 
7 
ーー: 一 基 
2 6 
ター1 
ト 全 sin 7 (7) 
7 一 0 
ーー1 7 一 
9 0 
三 >_ sin を 27 し (gz cos z, 十 5 
7ー0 =1 
還 NM 


2 


の 
向 十 > (gr cos &z』 十 sin 7) 二 と COS 7 の 7 





が 偶数 の 場合 に は 。 次 の 積 和 


(10.4) 


(gk cos z』 十 な sin の) 二 生 mo G0.5) 


| (10.6) 


・ 7 
k Sin の) 十 っ CO8 7 の 7 
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か ら , 


れ ー1 


王 カー1 
2 2 2 5 
do ニー の げ (?)。 gx ニ 上 0 zi が (2 6 了 2.N kz が (z) (10.7) 
7 7 


が 決ま る . ヵ が 奇数 の 場合 も 同様 で ある . 式 (10.3) の 両 式 と も 項 の 数 は ヵ で あり , 使 
用 する デー タ 点 の 数 に 等 し い . 使わ れ て いる 項 以 外 に は 独立 な 項 が な いこ と は 次 の こ 
と か ら 理 解 で きる . まず , 0< だ < ヵ と する と , 任意 の 整数 ? に つい て の =〆 十 紋 
に 関し て 























coszz, 三 cos(/ 十 272)Z7 三 CO8 だ COS 7727) 一 81n だ sin 72) 三 CO85 だ 
gin を 三 sin( 十 77)Z, 三 sin だ ) COS 727 十 CO8 だ み ) Sin 7747) 三 Bin だ の: 
(10.8) 











で ある か ら , 0< く < ヵ の 範囲 で 調べ れ ば よい . 式 (10.3) の 第 1 式 (7 が 偶数 ) に お い 
て , 7 くん <7 の 場合 に は . ん ニカ ルー だ と 置く と 0< だ < 訪 と な り 















































cosz: 三 cos(7 一 /)Zzj 三 co57Z7 CO8 だ 十 sin 2 の In だ) 
三 cos277cos だ z, 十 sin 277 sin だ 三 co5 だ 
(10.9) 
gin を, 三 sin( が 一刀 )Z 三 sin 7 の) CO8 だ ー CoS 2 の) Bin だ の) 
三 sin277cos だ 一 cos 277 sin だ ーーsin だ の: 
で ある か ら , 両 関数 と も すでに 使わ れ て いる . 特に . た = の と き は 
1 。 4277 。 . . 
Sm 77277 三 SIm 5 三 sin77 テ 0 (10.10) 





で ある か ら , sin7z, は 使わ れ て いな い . 式 (10.3) の 第 2 式 ( ヵ が 奇数 ) に お いて も 同様 
で ある . 

式 (10.3) の 関数 7(z) は 複素 関数 で も よい が , その 場合 に は 係数 も 複素 数 と な る . そ 
こ で , 三角 関数 の 代わ り に 指数 関数 e ぐ を 使う こと が 多い 























10.1.2 指数 関数 e“ に よる 展開 


オイ ラー の 公式 は . 








eーcosz 十 6sinz (? ニ ソー1 虚数 単位 ) (10.11) 
で ある . ここ で , 

0 

CO 三 ヶ 
= 

Cz = 二 半 ーー (を =1,・ ,72 一 1) 

の (10.12) 
@x 三 6 ( ヵ が 偶数 の 場合 ) 

お 0 っ ー 
Cx 2 を 0pー ル (を =m 十 1…」ー1) 
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と し , さら に , 














と する と , 式 (10.11) を 使っ て 式 (10.3) は 


ー1 
方 計 う eo 秒 
な =ー0 


と な る . @z, 0 を 求め る 手続 き と 同じ よう に , 
て 和 を と る と , 


ーー1 





7ー1 カー1 





(10.14) 


この 式 の 両辺 に 。 だ が * を 掛け て ヵ に つい 





> oe みた 詞 ア > co な あっ ー を が ー Cp (10.15) 
ヵ =0 ヵ ー0 0 
すなわち , // を た と し て 
1 7ー1 
cs ニー 2 (を =0,… ,%ー1) (10.16) 
と な る . この 際 , 
一 1 
(&- を ) _ J (%= が ) 
の 0 (と め ) (10.17) 
を 使っ て いる . 
フー リエ 変換 
関数 (z) が [-oo < ヶ < oo] で 定義 きれ て いる と き 。, 
2(⑦ = - 寺 / 7 で ed (0.18) 
V2 ァ co 
を げ (z) の フー リエ 変換 と いう . する と , 逆 に 
7 = に / 9)e7Ydg (10.19) 
V2r /_oo 


の 関係 も あり , (2) は 7(z) の 逆 フ ー リ エ 変 換 と いう . フー リエ 変換 と 送 フ ー リ エ 変 換 


の 相違 は 被 積分 関数 の 中 の 指数 関数 に -》 か ? 
で ある か ら 




















逆 の 定義 で も 全体 と し て は 矛盾 が 


の どちら が 使わ れ て いる か の 相違 だ け 
生じ な い . また , 積分 の 前 の 係数 - ニ - 











V2r 


の 付け 方 ゃ 定義 次 第 で あり , 片方 に 二 を 付け 他方 に は 何 も 付 け な い こと も ある . こ 





こ で は 式 (10.18) と 式 (10.19) を 採用 





する . 








プロ グラ ム (Fourier_Transform.java) の メソ ッ ド (fourier_Transform) と , その 説明 は 


以下 の と お り で ある . 


10.2 フー リエ 変換 lyal 





Fourier_Transform.java の メソ ッ ド (fourier_Transform) : 


1 public doub1e fourier_Transform(doub1e[] x, MyFunction ) { 
2 1nt nx= x.1ength: 

3 Gauss_Legendre g1= new Gauss_Legendre(16) : 
4 doub]e xm1in, xmax, 8Um: 

5 doub1e C= 1.0/Math . sqrt(2*Math . PT) : 

6 Sum= 0.0: 

7 xmin= x[O] : 

8 for (int =1: 1i<nx: 1 ユ ++) + 

9 xmax= [1] : 

10 Sum += g1.gauss_Legendre(xm1n, xmax, エ ): 
11 Xxm1n= xmax: 

12 # 

和 L) return C* ネ SUm : 

14 } ナ 


1. L1 て 14: メソ ッ ド fourier_Transform の 定義 で ある . 積分 は 積分 領域 を 適当 に 分 
割 し , Gauss_Legendre(16) 積分 を 繰り 返し 行う た め , 配列 x に 座標 の 分 割 点 を 
指定 する . f は イン タフ ェ ー ス MyEunction クラ ス の イン スタ ンス で あり , 解 
を 求め る 関数 が 定義 され て いる . 戻り 値 は フー リエ 変換 値 で ある . 

L5: 積分 項 に 掛か る フー リエ 変換 の 係数 で ある . 

L6: gauss_Legendre に よる 積分 値 を 足し 込ん で いく 変数 を ゼロ で 初期 化す る . 
L7: gauss_Legendre に よる 積分 の 下限 値 を 指定 する . 

L8 て 12: 積分 の 上 限 値 , 下限 値 を ずら し な が ら , 積分 を 配列 x の 要素 数 一 1 回 繰 
り 返 す . 

6. L13: 積分 に 係数 を 掛け て , 戻り 値 と し て 返す . 





























Pt 














ガウ ス 関 数 の フー リエ 変換 
ガウ ス 関 数 (正規 分 布 関数 ) 





げ @②) ー352 (10.20) 





の フー リエ 変換 は 。 や は り ガ ウス 関数 





s2 1 
eー 充 テ 6ー97 有 dz ー e~ 3 (10.21) 


| 9 0 
99=- 肝 / の ソ 計 


で ある . 元 の ガウ ス 関 数 の 式 (10.20) の z は 標準 偏差 と も いわれ, げ (c) = e~957(0) = 
0.6060… げ (0) で ある . ガウ ス 関 数 は 規格 化 さ れ て お り , 














oo 1 2 
/ っ e 2z2d ァ ー1 (10.22) 
三 @8 7 ひび 


で あり, 原点 で の 値 は 70 ニ ーーーー で ある . ガウ ス 関 数 は 偶 関数 で ある か ら 、 


フー リエ 変換 は cos(gz) に よる 余弦 フー リエ 変換 の み が 値 を も ち , sin(gz) に よる 正弦 
フー リエ 変換 は ゼロ に な る . その 余弦 フー リエ 変換 は , 先 の 式 (10.21) と 同じ で 




















1 0 1 2 1 
王 e 2c2 cos 2 dz 三 6 3 (10.23) 
の V 27 り 2 の V 2 
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で ある . この 際 , 公式 
oo 2 
eg" cos0z dz 一 V7 - 誠 (10.24) 
0 2 


を 使っ て いる . 図 10.3 の 上 段 は ガウ ス 関 数 で あり , 下段 は その フー リエ 変換 で ある . 
実線 は ヶ = 1.0 で あり , ガウ ス 関 数 と フー リエ 変換 は 同じ 形 で ある . 原点 で の 値 は , 
0.3989‥…. で ある . 点線 は ヶ =0.5 で ある . ガウ ス 関 数 は 1 に 規格 化 さ れ て いる の で 
幅 が 半分 に な っ て いる 反面 , 原点 で の 値 は 2 倍 に な っ て いる . その フー リエ 変換 は 幅 
が 2 倍 に な っ て いる が , 原点 で の 値 は 変化 し な い . 破線 は ヶ =2.0 で ある . 幅 が 2 倍 
に な っ て お り , 原点 で の 値 は 半分 に な っ て いる . その フー リエ 変換 は 幅 が 半分 に な っ 


て いる が , 原点 で の 値 は や は り 同 一 で ある . 





























e- 雪 で あり , 下段 は その 





図 10.3 ガウ ス 関 数 と フー リエ 変換 上段 は ガウ ス 関 数 - ユ 
5 二 
フー リエ 変換 で ある . 実線 は ヶ =1.0, 点線 は ヶ =0.5, 破線 は ヶ = 2.0 で ある 





10.3 高速 フー リエ 変換 (FFT) 








式 (10.16) で 訪 か ら フ ー リ エ 係 数 c。 を 求め る 変換 を , 離散 フー リエ 変換 (DFT) と 
いう . フー リエ 係数 を 求め ある た め に , 式 (10.7) ある い は 式 (10.16) を その まま 使っ て 
1 個 ず つ 計 算 す る と , ヵ 項 の 積 和 を ヶ ヵ 個 計 算 し な けれ ば な ら ず , 計算 処理 は ヵ 2 に 比 
例 す る こと に な る . し か し , 式 (10.7) ある い は 式 (10.16) を 見 る と , 三角 関数 ある い は 
指数 関数 。*^ - c- 空 炒 は 周期 関数 で あり , し か も ゃ 4 は 整数 で ある か ら 式 (10.16) の 
各 た に 関す る 項 の 中 に は , 異な る 値 と な る e- 全 数 訪 は % 個 だ け で ある . クー リー と 
テ チュー キー に より , デー タ 点 が 等 間隔 で あり , ヵ が 2 で 2 の べき 乗 で あれ ば , 訪 と 
玉 相 因子 の 積 和 を 工夫 する こと に よっ て , 計算 処理 が 7 ヵ ヵ ヵ に 比例 する アル ゴリ ズム が 
創出 され , それ は , 高速 フー リエ 変換 (Fast Fourier Transform) と いわ れ て いる . 

図 10.4 は ガウ ス 関 数 (c = 1.0) と FFT で 求め た フー リエ 変換 で ある . ガウ ス 
関数 は [-6.0, 6.0] を 256 等 分 し て 値 を 求め て あり , 実線 で 示さ れ て いる . フー リ 


エ 変 換 の 。 座標 の 刻み Ag は 2r を yz 軸 上 の 領域 の 幅 で 割っ た も の で ある か ら , 
2 旭 
6.0 - (一 6.0) 














































































































Ag =ー 0.523… で あり , |-6.0, 6.0] の 領域 に 256 点 の うち の 23 点 
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10.4 ガウ ス 関 数 と FET に よる フー リエ 変換 . 実線 は ガウ ス 関 数 (c = 1.0) で あり , 
[ -6.0, 6.0] が 256 等 分 され て いる . o 印 は フー リエ 変換 で あり , 刻み Ag は 0.523・‥・ で ある . 
(Z10.04FFTO_gauss.java) 


が っ o 印 で 示さ れ て いる . 座標 で の 領域 の 幅 は A。 x 256 で ある か ら , [|-134.0, 134.0] 
で ある . 

表 10.1 は ヵ =8 の 場合 の 式 (10.16) の フー リエ 係数 c。 = Po の 刻 に 掛か 
る 位相 因子 ot4 で ある . ーー 

0 < ん た く <7 で ある か ら 2 進 法 の 考え で , た = ニ p22+92 二 7 と カーs22 十 742Tew と 
置く こと が 可能 で ある . 式 (10.16) の ヵ , ヵ を この 2 進数 的 な 数 で 置き 換え て 書き な お 
し , eo ニー1 を 使っ て 整理 する と 


> し 9 (の 2"g2+ の (e2" 二 2 めす し 
































誠 
2 
ん 0 s 三 0 7 一 0 w 三 0 
1 1 
> し > し か It200 も 20 た (10.25) 
s 王 0 # 王 0 w 三 0 





1 1 
詩 4 PS 2 ゃ 2 | 
g 王 0 # 王 0 s 三 0 


と な る . 
表 10.2 て 表 10.5 は 訪 か ら ck へ の 変換 の 過程 を ボ す も の で ある . 表 10.2 は 変換 前 の 
訪 で あり , 第 1 列 は の 2 進数 p77 で . まだ 何 も 決 まっ て いな いか ら , 一 が 入っ て い 





























表 10.1 ヵ =8 の 場合 の フー リエ 係数 c。 と 関数 値 ヵ に 掛か る 位相 


了 


子 og を 











@5。 | 為 | 少 な 訪 上 が 7 
wl の | の | の | が |1 9 | の 19 
ee loo le | go7 1 6 の | 2 1 go5 | oe | go7 
9| 記 12 | の | 記 120luelge 
の 8 6 | 認 | 1M9| 9 | 吉 
eg | | が | 8 92 | の 861 220 | 24 | 2 
es | 10B|1 29 15 | 0 1619 |1。29 
ee 0 1 26 | の 2 | の 8 | 24 | 80 | 36 | 42 
eroN| 志 129 | | 


























174 



































































































































第 10 章 ー リ エ 級 数 と フー リエ 変換 
表 10.2 訪 と ヵ の 2 進数 sk. 第 1 表 10.3 FEFT の 第 1 段階 の 変換 . 第 
列 は た の 2 進数 ヵ 7 で , 第 2 列 は ヵ の 1 列 は ん の 2 進数 ヵ 7 で , 第 2 列 は ヵ 
2 進数 sz4 で ある . の 2 進数 sz4, で ある . 
の 97 CO/ の 97 8 
ーーー| 000 | 放 ーー-0 | -00 | 旋 十 放 
ーーー | 001 | 刻 ーー1 | 00 | 旋 二 訪 の * 
ーーー | 010 | ーー0 | 一 01 | 刻 十 訪 
ーーー | 011 | ーー1 | -01 | 族 十 訪 * 
ーーー | 100 | 記 ーー0 | -10 | あ 十 旋 
ーーー | 101 | 刻 沿 10 | あ 十 6? 
ーーー | 110 | -0 | -11 | 訪 十 方 
ーーー | 111 | 万 ei 敵 | 半 0 
表 10.4 FFT の 第 2 段階 の 変換 . 列 は た の 2 進数 pgr で , 第 2 列 は ヵ の 2 進数 sz で ある . 
の 97 874%4 
-00 | --01 (6 二 ) 十 (あお 十 放 
-01 | --0 | (が 二 放 の) 二 ( ち 十 放 の の) の" 
-10 | --0 | ( 旋 二 記 ) 二 ( あ 十 記 )e 
ー11 | --0 | ( あ 二 放 の の 9 二 ( ち 二 6o)o2o4 
-00 | --1 1 (方 十 訪 ) 十 (お寺 記 
= 中 | テー 申 カ 二 請う 二 ( お 十 廊 の う og? 
ー10 | 一 -1 | ( カ 十 誠 ) 二 (お寺) の 
一 11 = ュー 1 刻 に 訪 の バ に ( 放 = ド : 太 の Do2o4 





る . 第 2 列 は ヵ の 2 進数 sz で ある . 
1 
表 10.3 は , 式 (10.25) の 最後 の 括弧 内 の 項 で ある 第 1 段階 の 変換 2 し 0 の 処理 


が 行わ れ た 後 の 状況 で ある . この 変換 を 行う と , ヵ の イン デ ッ クス s は 消え て だ 
け に な り , た の イン デック ス の r が 現れ る . まず , それ ぞ れ 表 10.2 の 第 2 行 と 第 6 行 
を 組み 合わ せ , 7 = 0 の 場合 は , 第 2 行 と 第 6 行 の 和 旋 ,。。 十 方 7 ニテ 1 の 場合 は 差 
og 一 方 の ま ニー 放 時 十 方 oe と な り , 表 10.3 の 第 2 行 , 第 3 行 と する . 行 の 組み 合わ 
せ は (2.6) … (2.3) 。 (3.7) つ (4.5) 。 (4.8) 一 (6.7) (5.9) つ (8.9) で ある . 

















3 











1 

表 10.4 は 第 2 段階 の 変換 ゝ 912 で ある . この 変換 を 行う と , ヵ の イン デ ッ 
一 0 

クス ょ も 消え て ww だ け に な り , た の イン デック ス は gr に な る . 今回 の 行 の 組み 合わ せ 


は (2.6) (2.4)。 (3.7) つ (3.5) 。 (4.8) ー (6,8) , (5.9) つ (7,.9) で ある . 
































表 10.5 は 第 3 段階 の 変換 ゝ WT2179 で ある . この 変換 を 行う と , ヵ の イン 


g 三 0 
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表 10.5 FEFT の 第 3 段階 の 変換 . 第 1 列 は た の 2 進数 ヵ 7: で ある . ヵ の 2 進数 sz は な く な っ て いる . 


の 97 
000 
001 
010 
011 
100 
101 
110 
111 




















6 十 あ ) 二 (ちあ 寺 放 ) 十 (( カ 十 記 ) 十 (お 十 亡 )) 
が 十 カ の 9 二 ( あ 二 6 の eg2 二 (( カ 二 の ) 二 ( お 十 万 oo う の の ] 








6 十 あ ) 二 ( あ 十 放 ) の の 十 (( 記 十 記 ) 二 (お 十 方 )o の の) 

6 二 族 の) 十 ( あ 二 6gD)o7of 十 (方 二 が の ) 二 (お 十 廊 の)o7o の go? 
6 二 あ ) 十 ( あ 二 放 ) 二 (( カ 二 あ ) 二 (お 十 亡 ))o* 

が 寺 カ の ) 二 ( ち 二 6o の ef 十 (( カ 二 放 の の 上 (ね 二 太 oo の )o To* 

6 二 あ ) 二 ( あ 寺 放 ) の の 十 (( み 十 放 ) 二 (お 十 方)o の Do 

6 二 族 の) 十 ( あ 二 6g の og 二 (( カ が o の う ) 二 (お 十 の oo の oo 






























































デック ス v も 消え , を の イン デック ス は pgr と な り , 変換 が 終了 する . 今回 の 行 の 組 
み 合 わせ は (2.6) 一 (2.6), (3.7 つ 3 の, (48) ーー (48), (5,9) つ (5.9) で あ 
る . 表 10.5 を 整理 すれ ば , 式 (10.160) で ある こと が わか る . 

プロ グラ ム (Fast_Fourier_Transform.java) の コン スト ラク タ (Fast_Fourier_Transform ) 
は 以下 の と お り で ある . 




















Fast_Fourier_Transform.java の コン スト ラク タ (Fast_Fourier_Transform) : 


1 
2 
3 
4 
5 
6 
7 
8 
9 


10 
11 
12 
13 
14 
15 
16 
17 


publ1ic Fast_Fourier_Transform(int n, doubl1e xwidth) { 


doub1e rm= Math.1og((doub1e)n) /Math .1og(2.0): 

if (Math.pow(2.0,rm) !=n) { 
System.out .print1n("ERROR! n is not 2^m."): 
System.ex1it(0) : 

+ 

m= (int) (rm+0 .1): 

this .n= ni 

n2= n/2: 

て this . xW1dth= xw1dth: 

ra= nev doubl1e [n] : 

ia= nev double [n] : 

rb= nev double [n] : 

ib= nevw doub1e [n] : 

rom= nev double [n] : 

iom= nevw doub1e [n] : 


1. L1 て 17: コン スト ラク タ Fast_Fourier_Transform の 定義 で ある . 引数 の nm は デー 
夕 の 数 で あり m を 整数 と し て 2 で な けれ ば な ら な い . xwidth は 変換 する ヶ 座 
標 の 幅 で ある . 

2. L2^ へ 7: デー タ の 数 mn か ら m を 定め て いる . n が 2mP で な か っ た とら 警告 を 出力 し 
て , 処理 を 止め る 

3. L11, 12: ra,。 ia は 式 (10.13) の デー タ の 実数 部 と 虚数 部 の た め の 配 列 で ある . 
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4. L13, 14: rb, ib は 作業 用 の 実数 部 と 虚数 部 の た め の 配 列 で ある 
5. L15, 16: rom, iom は 変換 に 使う 式 (10.13) の 。 の 実数 部 と 虚数 部 の 配列 で ある . 














プロ グラ ム (Fast_Fourier_Transform.java) の メソ ッ ド (fast_Fourier_Transform) と , 
その 説明 は 以下 の と お り で ある . 


East_Fourier_Transform.java の メソ ッ ド (fast_Fourier_Transform) : 


10.4 





(CO O の 躍り は 


ロロ は は ニュ は は は ロビ 
の 串 喉 OO は の 


pub1ic doub1e[] [] fast_Fourier_Transform(double [] [] f, int is) て 
中 略 
for (i=0: 1<n: i++) て { 
中 略 
記 
iom[ 0]= 0.0: 
中 略 
for (int 1=0: 1<m: ]++) 
中 略 
+ 
Ss= xw1dth/n/Math . sqrt(2*Math . PT ) : 
for (i=0: 1<n: ュ ++) て 
中 略 
+ 
return an8: 


+ 


1. L1 て 16: メソ ッ ド fast_Fourier_Transform の 定義 で ある . 引数 の f は デー タ の 配 
列 double[2][i で あり , 実数 部 と 虚数 部 が 代入 され て いる . is は 正 で フー リエ 変 
換 , 負 で 逆 フ ー リ エ 変 換 で ある こと を 指定 する . 

L2: 作業 用 の 変数 や 配列 の 定義 が ある . 

L3 て 5: f の 値 を ra ia に コピ ー す る . 

L6, 7: っ の た め の sin, cos 関数 の 値 を 計算 し , 配列 rom, iom に 代入 する . 

L8 て 10: 式 (10.25) を 使っ て , 変換 を 繰り 返し 行う . 

L11: 変換 後に 掛け る 係数 を 作る 

L12 て 14: 変換 後 の 実数 部 と 虚数 部 に 係数 を 掛け , 配列 ans に 代入 する . 

L15: 戻り 値 ans を 返す . 
































9 SN 9 9 下 の 





3 次 元 極座標 系 に お ける フー リエ 変換 

















の 



































2 次 元 あ る い は 3 次 元 直交 座標 系 に お ける フー リエ 変換 は , 1 次 元 の フー リエ 変換 を 


各 次 元 に つい て 行え ば よい . 3 次 元 極座標 系 に お ける フー リエ 変換 は 次 の よう に な る . 














3 次 元 極座標 系 は 図 10.5 で ある . ヶ は 原点 か ら の 距離 で 動 径 と いわ れ , 9 は ぇ 軸 か ら 
征 度 で 天頂 角 、 ゅ は ヶ 軸 か ら の 角度 で 偏 角 (方 位 角 ) と いわ れる 
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10.5 3 次 元 極座標 系 . ヶ は 動 径 、9 は 天頂 角 、 ゅ は 方 位 角 で ある . 




















点 P の 座標 は , 直交 座標 系 で は (z, ヵ <) , 3 次 元 極座標 系 で は (?, の, の ) で あり , 
3 次 元 極座標 系 と 直交 座標 系 の 関係 は 





























Z 三 7sin の cos の 
り 9 デ 7sin の sin の (10.26) 
ヶ 三 7cos の 





で ある . 関数 を 3 次 元 極座標 系 で 表す 場合 に は , 動 径 座標 y の み の 動 径 関数 抗 (7) と 
座標 9, の の 関数 で ある 球面 調和 関数 Y%,。(9, の ) の 積 で の 展開 



































oo 7 
ゅ %(r) ニモ うう 7 店 且 (7 の (9 の (10.27) 








と な る . 7 は 負 で な い 整 数 () > 00 で あり , 妨 は -! か ら 7 まで の 2 1 個 の 整数 の 
値 (-7< 妨 </) を と れる . 球面 調和 関数 は 具体 的 に は 次 の 式 で 定義 され る . 























9 も 一 
ア 宛 (cos の e“7 の 10.2 
PP た 補 2! (cos の e (10.28 





(の の ニー1 リ 7 




















ここ で , PP(cos の ) は ルジャンドル 階 関数 で ある . これ ら の 球面 調和 関数 は 完全 直 
交 規 格 関数 系 を な し て いる の で , 直交 規格 関数 系 と し て 



































27 が 7 
/ / (の の (9 の ) Sin の dd の 3 7 が 7 の (10.29) 
0 0 
が 成り 立つ . また 完全 系 と し て 


うー Y( の 6 の Y( の , の ) = 39 一 の)8(④ー の ) (10.30) 


7777 
が 成り 立つ . 5 は クロ ネッ カー の デル タタ で あり , 6(z) は ディ ラッ ク の デル タ 関 数 で 
ある . 球面 調和 関数 の 初め の 7 =0, 1, 2 を 具体 的 に 記す と 次 の と お り で ある . 


























178 ー リ エ 級 数 と フー リエ 変換 








第 10 章 





























1 
Y 三 : 一 
00 上 
客 -1 ー in 9e- の 
877 
0 = 6 cos の 
7 
1 連 。。 二 ne の 
旭 
15 . ぅ 。_2 ぁ 
三 ーーー 10.31 
5_2 32 ィ sin^ 9e ( ) 
75-1」 三 』 sin 9 cos 9e~?? 
7 
Y2 デー ソリ ーー (3cos?9-1) 
20 三 16z 
51 ーーー1/ は sin 9 cos 9e?% 
Sr 
ー 15 2 2 の 
Y22 三 1/ 35。 Sn 9e 
関数 め (r) の フー リエ 変換 は 
1 5 5 
加 r)e "dr (10.32) 
*9=- 庄 ///% の 
で ある . 球面 調和 関数 と 球 ベ ッ セ ル 関 数 ヵ (g) を 用 いた 指数 関数 の 部 分 波 展 開 の 公式 
oo 7 
の ニー4r う (に の (9。 の が (の の (の) ) (10.33) 
7 一 0 7 ニー7 
を 使う と , 式 (10.32) は 
*(q) = Vi と と es (の Y( の 。 @) 
7772 7 
(-0/ Ya (6。, @。)77( の 7 (の み .)72 sin の.d7d の .d の 。 
三 の さき が ダー 『 1277 7 が 7,, (@.@) / 5 (⑦ み (gr)72dy 
7772 7 0 
(10.34) 
6976。 の) am の dd の 
2 6 RE 
三 志 が ny @。) 項 (7) 放 (97)7"d7 
7772 
ーー フ 2 gzY( の 6, %) 肪 (の 
7772 
と な る . 直交 座標 系 z, ヵ , z か ら , 極座標 系 9 の ゐ に 移る と , 積分 要素 は dzdydz = 
9(Z, め , ?) 


9⑦, の の ) 


d7d9d ヵ = ァ "sin 9d7d9d ゐ 2 に 変わ る が , 




















図 10.6 は その 直観 的 な 説明 で ある . 
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図 10.6 3 次 元 極座標 系 の 積分 要素 . 動 径 方 向 の 増加 は dy ①, 天頂 角 の 方 向 は 子午 線 に 沿っ 
て 7d9② , 方 位 角 の 方 向 は 緯線 に 沿っ て ヶ sin 9d の ③ で ある . 





















































希 10.5 の 点 わ どか ら 3 本 の ベク トル dy, 7d9, 7sin 9d2 が 描か れ て いる . これ ら の 3 本 
の ベク トル で 作ら れる 近似 的 な 直方 体 の 体積 が 2 sin 9d7d9d ぁ ヵ と な る . 
式 (10.34) の 互 (g) は 動 径 フー リエ 変換 


(9) = た 岳 (7)( の 72d7 (10.35) 

















で ある . 

図 10.7 は 水素 原子 の 1s 動 径 波動 関数 の フー リエ 変換 動 径 運動 量 波動 関数 万 。() 
を 式 (10.35) を 使っ て 求め , 互 。(?) に 動 径 座標 ? を 掛け た ? 肪 。(7) で ある . 実線 は 解析 
的 に わか っ て いる 1s 動 径 波動 関数 丸 」。(7) = 2e-" か ら 求 め た も の で あり , o 印 は 図 6.4 
(p.106) に 示さ れ て いる 値 を 使っ て 求め た も の で ある . 図 6.4 の 関数 は 互 。(7) = 7R」。(7) 
で ある . 当然 な こと で ある が , 両者 の 動 径 運動 量 波動 関数 は 一 致し て いる . また , 





























個 







































































10 
/ | 肪 。(2)g7dg = 0.99998 (10.36) 








10.7 水素 原子 の 1。 動 径 運動 量 波動 関数 玉 。(⑦). は 運動 量 空間 の 動 径 座標 で あり , 単 
位 は で ある . au. は 原子 単位 を 表し て いる . 実線 は 解析 的 な 1。 動 径 波動 関数 を 解析 的 に 
フー リエ 変換 し た 関数 で あり , o 印 は 図 6.4 で 使わ れ て い ぃ る 数 値 を フー リエ 変換 し て 求め た も 
の で ある . 
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で ある か ら 規 格 化 され て お り , g=0^ 10 で 0.99998 に な っ て いる . 
解析 的 な 1s 動 径 波動 関数 丸 。(7) = 2e-" の フー リエ 変換 は , 以下 の と お り で ある . 
玉 」。(7) = 2e-" を 式 (10.35) に 当て は め る と 


2 / だ . 2 / で 。 sin( の 7 
抗 。(⑰) = Y/ Axerr= 2 / 2e 2 








(10.37) 
王 だ と 7 sin(g7 り 7d7 
と な る . 不定 積分 の 公式 
e sin(g7)d 人 (一 sim(gy) 一 cos(g7)) 
リ Wi (10.38) 


ーー アデ 


Ma cos(g97)d7 Tr cos(g7) 十 9sin(g7)) 


を 使っ て 部 分 積分 を する と , 式 (10.37) は 


22 1 / タ 昭 3 4 
屯 (9) = お / (@ "sim( の ) 十 9@「「 cos(g)) dr = Vi fg 


(10.39) 











と な る . 図 10.7 の 実線 は この 関数 。 玉 。(。) を 表示 し た も の で ある . 


畳み 込み と 畳み 込み 除去 





すべ て の 実験 で 実験 誤差 が 入る こと を 避け る の は 不可 能 で ある . 一 般 的 に 、 あ る 変 
数 > に つい て の 分 散 を 求め る 実験 の 際 に , 理論 値 は 7/( ヶ ) で ある の に , 実験 を 行う と 
7 げ (Z) 二 e の 形 で 生じ る 誤差 も ああ る し , 7(z 十 e) の 形 で 生じ る 誤差 も あり , また , 両者 
が 同時 に 生じ る こと も 多い . 前 者 は , 現象 の 回 数 が 少な いた め に 生じ る と も 考え られ , 
統計 誤差 と いわ れる . この 誤差 の 補正 と し て は , デー タ の 平滑 化 が 使わ れる . 後者 は , 
例え ば , 光学 系 の 場合 に 光源 が 点 光 源 で は な か っ た り , 検出 器 の 口径 に 大 き さ が あり , 
点 で な いた め な ど で 生 じ る , いわ ゆる 「 ぼ け 」 で ある . この ほか , エネ ルギー 分 散 が 
得 ら れる 実験 で は , 現象 の 時 間 が 有限 で ある た め に , 不 確 定性 関係 か ら 生 じ る ば ら つ 
きも ある . この 場合 は , 理論 値 を 「 ぼ け 」 の 原因 と な る 関数 を 使っ て ぼかし て (畳み 込 
み , convolution) 実験 値 と 比較 検討 し た り , 実験 値 に 畳み 込み 除去 (deconvolution) を 
施し て , 理論 値 と 比較 し た りす る 場合 も ある . 

畳み 込み を 起こ す 関 数 と し て は , ガウ ス 関 数 が 当て は まる 場合 と .。 ロー レン ツ 関 数 
(コー シー 関数 ) が 当て は まる 場合 な ど が ある . (oo, oc) の 領域 で 規格 化 さ れ て いる 
これ ら の 関数 型 は . それ ぞ れ 


9(Z) ニ に (ガウ ス 関 数 ) 










































































































































































(10.40) 
9z) = ーーーー。 (ロー レン ツ 関 数 ) 
21 
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で ある . ガウ ス 関 数 の ヶ は 標準 偏差 で も り . ロー レン ツ 関 数 の T は 半値 幅 で ある . と 
も に 値 が 大 きく な る と 分 布 が 広がる . 


10.5.1 畳み 込み 





災 10.8 に , フー リエ 変換 の 応用 で ある 畳み 込み の 一 例 と し て , 金属 鋼 に よる 又 線 の 
吸収 曲線 の 実験 値 ヵ ( 万 ) と 理論 値 7 だ) お よび 理論 値 に ロー レン ツ 関 数 で 畳 み 込 み を 
施し た も の を 示す . 

昌 論 値 が 関数 /(z ヶ ) で 与え られ る 場合 に . それ を ぼかす 原因 と な る 実験 系 の 関数 が 


9(?) で あれ ば , 点 > で の 理論 値 (>/) は ぼけ て g(?ー ァ 7)7(z7) と な る . そこ で , 実験 
で 得 ら れる 関数 は 
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(zz) = /se ー タ ) げ (z)dz/ (10.41) 




















と な る . も ちろ ん , 各 > に つい て この 積分 を 直接 行う こと も ある が , 次 の よう に ., 
フー リエ 変換 を 使っ て 求め ある こと も で きる . 式 (10.41) の 両辺 の フー リエ 変換 を 行う 
と , 左辺 は 


万 (9) = / erdz (10.42) 


と な り , 右辺 は 





10 20 30eV 
































図 10.8 金属 銅 に よる X 線 吸収 曲線 理論 値 の 畳み 込み . 最上 段 が 理論 値 /(), 最 下 段 が 
験 値 /() で あり , 他 は , 理論 値 に ロー レン ツ 関 数 で 崩 み 込み を 施し た 後 の 値 で ある . 横 軸 
の 単位 は 電子 ボル ト (eV) で あり , 原点 は 吸収 端 ( フ ェ ル ミ 準 位 ) で あぁ る. 縦 軸 の 単位 は 不定 
で ある が , 実験 と 理論 で 面積 が ほぼ 等 し く な る よう に 規格 化し て ある . 上 か ら 2 段 目 の 左 は , 
エニ 1eV と し た ロー レン ツ 関 数 で あり , 右 は それ を 使っ て 理論 値 に 畳み 込み を 施し た も の で 


ある . 以下 順に T = 2. 3, 4eV の 場合 で ある . (Z10_08_conv_Cu.java) 
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の 7eOdze-rdg 
ー ル 9 の eeT の dz の ede (10.43) 
= ビ ( の 7(9 の 
と な る の で 」 
万 (9) = C( の )7( の ) (10.44) 
が 成り 立つ . 



































4 個 の ロー レン ツ 関 数 の フ 














ここ で 用 いた フー リエ 変換 プロ グラ ム は FFT で ある . 実験 デー タ は 図 10.8 に 示さ 











リエ 変換 で ある . 


区 10.9 は , 図 10.8 に 示さ れ て いる 理論 値 , 実験 値 ., それと T=1, 2, 3, 4eV と し た 





























れ て いる 範囲 で , 等 分 割 の 256 点 で 得 ら ちら れ て いる . 理論 値 は 実験 値 に な ら っ て 計算 


され て いる . この まま の デー タ 領 域 で フー リエ 変 : 換 を 行う と 。 座標 の 範囲 の 幅 
40 芝 で ある か ら , 座標 で の 点 の と り 方 が 極端 に 粗い こと に な り , 1 当たり 


























は 約 
約 6 


点 し か な い の で , z 座標 を 広げ な けれ ば な ら な い . まず , 高 エ ネル ギー 端 で の 大 き な 
ステ ッ プ の 影響 を 抑え る た め , 高 エ ネル ギー 端 で デー タ を 左右 反転 し た も の を つなげ , 
さら に デー タ の 両側 に は ゼロ の デー タ を 補い , デー タ 領 域 
を 640eV に 広げ , デー タ 点 を 4,096 点 と し た . 座標 の 幅 は 約 0 で ある が 」 
は 5 二 まで し か 示し て いな い . 理論 値 と 実験 値 を 比較 する と , 0.5 あたり まで は 似 





左右 対称 の デー タ と し た . 























































































































図 に 


通っ て いる が , それ 以後 は , 実験 値 は 収束 し て いく が 理論 値 は 振動 が 続き /(z) が 滑ら 


か で な いこ と を 反映 し て いる . 4 個 の ロー レン ツ 関 数 7(z) は 図 10.8 に 示さ れ て いる 














図 10.9 金属 銅 に よる X 線 吸収 


9 

















5 9 





線 の 理論 値 , 実験 値 . そ れ と 4 個 の ロー レン ツ 関 数 の フー 























リエ 変換 、 最上 段 が 理論 値 (2), 





最 下 段 が 実験 値 万 (。) で ある . 上 か ら 2 段 目 は 、T=1eV 


と し た ロー レン ツ 関 数 G(。2) で あり , 以下 順に T = 2, 3, 4eV の 場合 で ある . 横 軸 の 単位 は 
1/eV で あり , 縦 還 に つい て は 理論 値 と 実験 値 は 不定 で ある . ロー レン ツ 関 数 に つい て は , 原 
点 で の 値 が 1/r = 0.3183・…・ で ある . (Z10_.09_fourier_Cu.java) 
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よう に , T=1,2,3, 4eV の 順に 幅 が 広く な っ て いる . それ を 反映 し て , 図 10.9 で は 
G(g) の 広がり が この 順に 狭く な っ て いる . 
九 10.8 に は , 式 (10.44) の 逆 フ ー リ エ 変 換 に よっ て 畳み 込み を 行っ た 結果 が , T = 
1, 2, 3. 4eV の 順に 示さ れ て お り , 徐々 に ぼけ 具合 が 激しく な っ て いる . ちな み に , こ 
の 実験 で の 実験 系 の T は 約 2eV で ある . 

プロ グラ ム (Z10_08_conv_Cu.java) の メイ ン メ ソ ッ ド の 一 部 と , その 説明 は 以下 の と 
お り で ある . 























Z10_08_conv_Ou.java の メイ ン メ ソ ッ ド の 一 部 : 


は ーー は 
OO 〇 Oo ココ の 中 の OMD は ロビ 


CO QO OQ の OO の OOOO の OO の OO の OO の DD らら りり DD らら DD いり いい は ビビ ビビ ビビ ロビ 
(CC 0QO の 避 忠 の 〇 は の OO の の 喉 の 〇 いい は の の COO の の の 愉 O の い 


doub1e[] hrd= { 
中 略 
8 
doub1e[] frd= + 
中 略 
』 8 
1nt nd= frd.]1ength: 
doubl1e dwidth= 40.0: 
doub1e de= dwidth/nd: 
int n= 4096: 
int n2= n/2: 
doub]e emin= -n2*de: 
doub]e emax= n2*de: 
中 略 
doubl1e[] e= ne doub1e [n] : 
doub1e [] [」 hr= new doub]1e[2] [n] : 
doub1e [] [] hf= new doub]1e[2] [n] : 
doub1e [] [] fr= new doub]e[2] [n] : 
doub1e [] [] ff= new doub]1e[2] [n] : 
double [] [] gr= ne doub1e[2] [n] : 
doub]e [] [] gf= ne doub1e[2] [n] : 
doub1e [] [] wr= new doub]1e[2] [n] : 
doub1e [] [] vwf= new doub]1e[2] [n] : 
le 1 
doub1e qmax= n2*2*Math .PT/(emax-emin) : 
double qmin= -qmax : 
for (1i=0: 1<n: ュ ++) て 
e [1] = emin+ ュ ネ *de : 
hr [0] [1]= 0.0: 
hr [1] [1i]= 0.0: 
fr[0] [1i]= 0.0: 
fr [1] [1i]= 0.0: 
+ 


nt min= n2-md: 








for (i=min: 1i<n2: ュ ++) { 
| 選 誰 el 三 4U8 
hr [0] [i] = hr[O] []] = hrd[i-min] : 
fr [0] [1i]= fr[0] []] = frd[i-min] : 
肌 
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40 doub1e snorm= nd/2: 

41 doub1e sum= 0.0: 

42 for (i=0: 1<n: 1++) て 

43 Sum= sum+hr[O0] [1] : 

44 が 

45 Sum ニ SnOorm/Sum : 

46 for (i=0: 1<n: 1 ュ ++) て 

47 hr [0] [1i] = hr[O] [1] *sum: 

48 + 

49 Sum= 0.0: 

50 for (i=0: 1<n: 1++) て 

51 Sum= sum+fr[O0] [1] : 

52 が 

53 Sum ニ = Snorm/8um : 

54 for (i=0: 1<n: 1++) て 

55 fr[0] [1i] = fr[0] [1] *sum: 

56 

57 Fast_Fourier_Transform ffc= new Fast_Fourier_Transform(n, (emax-emin) ) : 
58 Fast_Fourier_Transform ffcq= new Fast_Fourier_Transform(n, (qmax-qmin) ) : 
59 中 略 

60 gk .gp1(n2-nd,nd ,e ,hr [0] ) : 

61 ff= ffc.fast_Fourier_Transform_C(fr, 1) : 

62 doub1e xx: 

63 double[] gam= {1.0, 2.0, 3.0, 4.0}: 

64 String[] Stgam= {"1eV", "2eV", "3eV", "4eV"}: 
65 doub1e gamma, C: 

66 for (k=0: k<4: k++) て 

67 gamma= gamlk] : 

68 c= gamma/(2*Math .PT) : 

69 for (i=0: 1<n: ュ ++) て 

70 メニ (n2-1 ) *de : 

71 gr [0] [1] = c/(x*x+gamma*gamma/4) : 

72 gg [1] 1]= 0.0: 

旨 + 

74 g= ffc.fast_Fourier_Transform_C(gr, 1): 
75 中略 

76 for (i=0: 1<n: ュ ++) て 

77 wf [0] [1]= ff [0] [1]*(gf [0] [1] *Math . sqrt(2*Math .PT) ) : 
78 wf [1] [1i]= 0.0: 

79 + 

80 wr= ffcq.fast_Fourier_Transform_C(wf , -1) : 
81 中 略 

82 gk .gp1(n2-nd ,nd ,e,wr [0] ) : 

83 中 略 

84 + 

85 中 略 

86 gk .gp1(n2-nd,nd ,e ,f て [0] ) : 


1. L1 へ 3: 実験 デー タ の 配列 . 
2. L4^ て 6: 理論 値 の 配列 . 
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L7 て 9: nd は 理論 値 お よび 実験 デー タ の 個数 .、 dwidth は エネ ルギー 幅 40eV, de 


は エネ ルギー 刻み で ある . 
L10, 11: FET で 扱う デー タ 数 を 4.096 と する . 


L12, 13: エネ ルギー 幅 を FET で 扱う デー タ 数 に 合わ せ て emin か ら emax まで 


に 広げ る . 
L15: エネ ルギー 座標 の 配列 . 








L16 へ 23: フー リエ 変換 で 使う 配列 . 実験 値 , 理論 値 . ロー レン ツ 関 数 , 作業 用 
の 配列 を ,. それ ぞ れ e 空間 、 q 空間 用 の 二 つ ず つ 定 義 し て いる . 各 配 列 に は 

















実数 部 と 虚数 部 が ある . 
L25, 26: 7 座標 の 範囲 を 指定 する . 
L27 へ て 33: e 空間 座標 値 の 設定 と デー タ 用 配列 を ゼロ で 初期 化 






























































L34 て 39: デー タ 値 を 中 央 部 に 代入 する . 負 側 の 左 か ら 中 央 まで は デー 


























に コピ ー し , 右側 に は 左右 を 反転 し て 降順 に コピ ー す る . 
L40 て 48: 実験 デー タ を 規格 化す る . 

L49 て 56: 理論 デー タ を 規格 化す る . 

L57: Fast_Fourier_Transform の イン スタ ンス ffc を 作る . 
L58: Fast_Fourier_Transform の イン スタ ンス fcq を 作る . 
L60: 実験 値 デ ー タ の グラ フ を 描く . 

L61: 実験 値 デ ー タ の フー リエ 変換 を 配列 に 与え る . 
L63: ロー レン ツ 関 数 の T 値 を 与え る . 

L66 へ 84: 4 種 の ロー レン ツ 関 数 の ルー プ を まわ す . 

L68: ロー レン ツ 関 数 の 係数 を 作る . 

L69 て 73: ロー レン ツ 関 数 の 値 を 配列 に 作る . 

L74: ロー レン ツ 関 数 の フー リエ 変換 を 配列 gf に 与え る . 

















L76 へ 79: 理論 値 と ロー レン ツ 関 数 の フー リエ 変換 値 の 積 を 作る . 











偶 関数 な の で , 虚数 部 は ゼロ で ある . 

L80: フー リエ 逆 変 換 で 畳み 込み を 行う . 
L82: 畳み 込み 後 の ゲ デー タ の グラ フ を 描く . 
L84: 4 種 の ロー レン ツ 関 数 の ルー プ の 終了 . 
L86: 理論 値 デ ー タ の グラ フ を 描く . 























10.5.2 畳み 込み 除去 





ン 








式 (10.44) を 変形 し た 


の 逆 フ ー 





リエ 変換 を 行え を ば , 原理 的 に は 
と が で きる こと に な る が , 
し まう . 
けれ ば な ら な い の で , 結果 は 厳密 な も の で は あり 得 な いと いえ る . 図 
属 銅 に よる XX 線 吸 収 曲 線 の 理論 値 (>) と 実験 値 ヵ (z>) の ほか , 式 (10.45) の 逆 フ ー 


そこ 
































両 関数 と も に 


(10.45) 





「 ぼ け 」 を 除去 し た 関数 で ある げ (z) を 得る こ 
分 母 に ある (2) の 値 が 小さ く な る と 好 (2) に 発散 が 生じ て 


で , 適当 な g よ り 大 きい と ころ で は , 刀 (2) を 小さ くす る cut off を し な 













































































10.10 に は , 





さ Z 


PA 


リ 


エエ 変換 に よっ て 畳み 込み 除去 を 行っ た 結果 が , T = 1, 2, 3, 4eV の 順に 示さ れ て いる 


cut off は 約 125 て と し て いる . 徐々 に 特徴 が は っ つき り し て き て は いる が . 








T の 値 が 
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0 |O 20 30eV 


























10.10 人 金属 銅 に よる X 線 吸収 曲線 実験 値 の 畳み 込み 除去 . 最 下 段 は 実験 値 ヵ ( 万 最上 段 
は 理論 値 /( 太 ) で あり , 以下 順に 実験 値 を T = 1, 2, 3. 4eV の ロー レン ツ 関 数 で 畳み 込み の 除 
去 を 施し た 後 の 値 で ある . 横 軸 の 単位 は 電子 ボル ト (eV) で あり , 原点 は 吸収 端 ( フ ェ ル ミ 準 
位 ) で ある . (Z10_10_deconv_Cu.java) 






































3eV 以上 に な る と , 余計 な 振動 が 激しく な り , 理論 値 が な けれ ば どこ まで が 真実 で あ 
る か の 判定 は 難し いか も し れ な い . ここ で は , cut of を step function と し て いる が , 
滑ら か に ゼロ に する な どの 工夫 も 必要 で あろ う . 

プロ グラ ム (Z10_10_deconv_Cu.java) の メイ ン メ ソ ッ ド の 一 部 と , その 説明 は 以下 の 
と お り で ある . 

















Z10_10_deconv_Ou.java の メイ ン メ ソ ッ ド の 一 部 : 


中 nt icut= n2/16: 

の for (k=O0: k<4: k++) て 

3 中略 

4 gf= ffc.fast_Fourier_Transform_C(gr, 1): 

5 中略 

6 for (i=0: 1<n: ュ ++) て 

7 if (i<n2-icut || i>n2+icut) て { 

8 wE [0] [ii]= 0.0: 

9 + e1se 
10 wf [0] [1] = hf [0] [1i] /(gf [0] [i] *Math . sqrt(2*Math . PT) ) 
11 + 
12 wf [1] [1i]= 0.0: 
13 + 
14 中略 
15 Wr= ffcq.fast も _Four1er_Transform_C(wf , -1) : 
16 + 





1. L1: 高周波 部 分 を カッ ト す る た め の 位置 . 場合 に よっ て は , カッ ト を 滑ら か に す 
る 必要 が あり , 工夫 の 余地 が ある . 
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2. L2 て 15: 4 種類 の ロー レン ツ 関 数 の ルー プ を まわ す . 

3. L4: ロー レン ツ 関 数 の フー リエ 変換 が 配列 gf に 与 ら れる. 

4. L6^13: 実験 値 の 変換 後 の 値 を も. ロー レン ツ 関 数 の 変換 後 の 値 で 割り , 配列 wf 
に 代入 する . この 際 , カッ ト が 必要 で あり , ここ で は 単純 に 中 心から icut の 両 
外側 を ゼロ に し て いる だ け で ある 

5. L12: 偶 関数 で ある か ら , 虚数 部 は ゼロ で ある . 

6. L15: 配列 wf の 逆 フー リエ 変換 に より , 畳み 込み 除去 を 行う 




















演 普 問 是 














10.1| ガウ ス 関 数 の フー リエ 変換 プロ グラ ム Z10.03_gauss.java を 変更 し て , 関数 


ニー の フー リエ 変換 プロ グラ ム Q10.01.Z10.03.delta.java を 作り な さい . た 
刀 


ーー は 式 (10.30) 
77 











だ し , ティ /2, 7, 37/2 と する こと . ちな み に , 6(z) = hm 
9ー* OO 

に 出 て きた デル タ 関 数 で ある . 
解答 例 : ソー スプ ログ ラム Q10_01.Z10_03_delta.java 





で sin gy 5 gl < の 
/ ーーーcosg9dz < く 1/2 (lg| =9) 

ーー っ 7 の 
0 (| > の 





で ある が , 積分 領域 が 有限 で ある た め 振 動 が 生じ て いる . 
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最近 の プロ グラ ミン グ 言 語 の 多く に は , 0 <z ヶ <1 の 重 囲 に 一 様 に 分 布 す る 擬似 乱数 
を 返す 関数 が 用 意 さ きれ て いる の で , 乱数 発生 の アル ゴリ ズム は 省き , その 利用 に つい 
て いく つか の 例 を 述べ る . 



























































11.1 モン テカ ル ロ 法 と 積分 











区 11.1 は 。-1<z <1 の 範囲 で 乱数 を 作り z 座 標 値 と し , 続い て -1< ッ <1 の 範 
囲 で 乱数 を 作っ て ? ヵ 座標 値 と し て , -1< ヶ <1 と -1< り <1 の 正方 形 内 に 点 を 打っ 
て いっ た も の で ある . それ ら の 点 の うち , 半径 1 の 円 の 中 に 入る 点 の 数 を 数 える と 
全体 の 点 の 数 に 対す る その 数 の 比 に 正方 形 の 面積 4 を 掛け た も の が , 円 の 面積 (円 周 
率 ) に な る . 

プロ グラ ム (Z11.01monte.java) の メソ ッ ド の 一 部 と , その 説明 は 以下 の と お り で 
ある . 








































































































図 11.1 ヒッ ト ・ オ ア ・ ミ ス 法 に よる 円 周 率 . 2 個 の 乱数 を 一 組 と し て 作っ た 座標 値 (z, ヵ ) 
を プロ ッ ト し た . 点 の 数 は 10.000 点 で ある . 半径 1 の 円 の 内 部 に プロ ッ ト さ れる 点 の 数 の 割 
合 は , ほぼ こ に な る . (Z11.01monte.java) 


純 




















人 央 記 引 


Z11.01_monte.java の メソ ッ ド の 一 部 : 


トト + 


doubl1e X,Y: 

1nt 1n=O : 

nt max=10000: 

for (int i=0: 1<max: ユ ++) 
メニ = 2*Math .random() -1 .0: 
y= 2*Math .random()-1 .0: 
gk.gdot(x,7) : 
1f (x*x+y*7 く = 1.0) in++ : 


(〈 OQO の 中 QO の いい 


L1: [-1, 1) の 乱数 を 代入 する 変数 で ある . 








L3: 発生 きせ る 点 の 数 
L4 て 9: 発生 さき せる 点 の 数 だ け ル ー プ を まわ す . 


Gb.。 59: CNS し (5 






































8 





点 の 数 に 1 を 加え る . 
8. L9: ルー プ の 終わ り で ある . 
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L2: 円 の 内 側 に ヒッ ト し た 点 の 数 を 数 える 変数 で あり , ゼロ に 初期 化し て お く . 





L5,6: メソ ッ ド Math.random は , 範囲 が [0, 1) の 一 様 分 布 乱数 で ある か ら , 
[-1, 1) の 範囲 に 座標 変換 し て , 変数 x, y に 代入 する . 

L7: 座標 (xy) に 点 を 表示 する (グラ フィ ックス の 準備 は すでに し て ある ) . 

LS: 点 の 位置 の 原点 か ら の 距離 が 1 以下 で あっ た ら ヒ ッ ト し た の で , ヒッ ト し た 





表 11.1 は . この よう に し て 求め た 円 周 率 の 値 と 積分 で 求め た 値 が , 使っ た 乱数 の 
数 に より , どの よう に 収束 し て いく か を 示す も の で ある . 数 % の 精度 で よい な ら 
1.000 点 程 度 で よい が , 1% 以下 に 抑え よう と する と 数 万 点 が 必要 と な る . これ は , ヵ 


























回 の 試行 を 行う と 誤差 は / 必 と な り , 相対 誤差 は z と な る こと に 対応 し て いる . 


この よう に , 円 の 内 部 と いう 条件 に 「 合 うか どう か 」 を 使う 方 法 を ヒッ ト ・ オ ア ・ 











表 11.1 乱数 で 求め た 円 周 率 . 2 個 の 乱数 を 一 組 と し て 作っ た 座標 (z, ヵ ) の うち , 半径 1 の 






































円 内 の 点 の 割合 か ら 求め た 円 周 率 ( ヒ ッ ト ・ オ ア ・ ミ ス 法 ) と 乱数 を 使っ た モン テカ ル ロ 法 の 積 











名 
分 2/ ソー:2dr の 値 で ある . 点 の 数 は 使っ た 点 の 数 , 数 値 は 得 られ た 
ー1 











上 の 数 hit 積分 | 点 の 数 | hit 柄 分 
真 値 | 3.1415 10000 | 3.150 | 3.140 
100 | 3.36 3.19 | 15000 | 3.155 | 3.143 
200 | 3.44 3.09 | 20000 | 3.148 | 3.144 
400 | 3.27 3.12 | 25000 | 3.152 | 3.144 
800 | 3.12 3.17 | 30000 | 3.152 | 3.144 
1000 | 3.12 3.14 | 35000 | 3.149 | 3.145 
2000 | 3.17 3.13 | 40000 | 3.142 | 3.146 
4000 | 3.17 3.14 | 45000 | 3.145 | 3.146 
8000 | 3.15 3.14 | 50000 | 3.147 | 3.145 


























周 率 の 値 で ある . 
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ミス 法 と いう . この 積分 を 乱数 で 求め る も う 一 つの 方 法 は , 範囲 が 0 < ヶ <1 の 乱数 
か ら , 変換 > ヶ =27 一 1 に よっ て yz の 乱数 を 作り , 積分 を 


1 4 
2 V1 一 z2dr 王 CO (11.1) 


の よう に 変形 し て , 関数 値 の 平均 を と る 方 法 で ある . た だ し , この 場合 は 了 (z) = 
2V ソ 1 一 2 で ある . ヒッ ト ・ オ ア ・ ミ ス 法 と 比較 し て , ほとん と ど 優 れ て は いな い . 他方 , 
同じ 積分 を ガウ ス ・ ル ジャ ンド ル の 32 点 で 行っ た 値 は 3.14164 で あり , ずっ と 優れ て 
いる . し か し , 次 元 の 高い 多重 積分 で 1 へ 2 桁 の 有効 数 字 の 答え を 求め る 場合 な ど に 
は , モン テカ ル ロ 法 の 積分 が 有効 で ある . 




















11.2 関数 型 分 布 乱数 











引 
先 の 2/ 1ー。2dz の モン テカ ル ロ 法 の 積分 で は 。 変数 > の 積分 領域 が (- 1.1) 
ー1 


で ある か ら , 区 間 (0,1) の 一 様 分 布 に 従う 確率 変数 で ある 乱数 ヶ か ら , 変換 z=2 ヶ 一 1 
に よっ て z の 乱数 を 作っ た . 一 般 的 に , 一 様 分 市 で は ある が z の 区 間 が (<, め ) の 場合 
に は , 変数 変換 を する 変換 関数 ヶ =z+ (5ーg)r を 使え ば よい . し か し , 各種 の 分 布 関 
数 了 (z) に 従う 確率 変数 > が 必要 な 場合 に は , 変換 関数 は それ ほど 単純 で は な い . 












































11.2.1 標準 指数 分 布 乱数 
図 11.2 は 次 に 述べ る 逆 関 数 法 で 求め た 標準 指数 分 布 型 
げ (?) = (11.2) 








の 乱数 で ある . > の 刻み は 0.04 で , 発生 させ た 乱数 の 数 は 10 万 で ある . 

この 図 の 意味 は , [0, 1) の 範囲 に 一 様 分 布 す る r の 値 を 変数 変換 し て > に する と 
ある > の 値 の 出現 頻度 が , 分 布 関数 7/(>) に 比例 する と いう こと で ある . その 変換 関数 
の 作り 方 は 以下 の と お り で ある . 

式 (11.2) の 累積 分 布 関数 は 


7(Z) = / げ ( の d = / e~*d ニ 1 一 e~” (11.3) 






































11.2 逆 関数 法 で 求め た 標準 指数 分 布 型 乱数 の 分 布 . z の 刻み は 0.04 で , 発生 させ た 乱数 
の 数 は 10 万 で ある . (Z11.02_exp.java) 
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で ある か ら , この 関数 の 下限 値 が (0) = 0 を 乱数 * の 下限 値 0 に 対応 させ , 上 限 値 
(oo) = 1 を の 上 限 値 1 に 対応 きせ れ ば , z の 分 布 は 指数 分 布 に な る . そこ で 標準 指 
数 分 布 型 乱数 は , 乱数 ヶ に 対応 する z の 式 (11.3) を 7 に 等 し いと 置い て その 逆 関 数 を 
と れ ば よい か ら , 











ァ ー ア ー「(7) ニーlog(1 一) (11.4) 


と な る . これ が 求め る 変換 関数 で ある . この よう に , 分 布 関数 7(z) の 累積 分 布 関数 


(>) が 解析 的 に 求め られ る 場合 に は , その 逆 関 数 > ヵ = ァ アー!⑦) が その 分 布 を 与え る 乱 
数 と な る . 

プロ グラ ム (Random_Exp.java) の メソ ッ ド (random_Exp) と ,、 そ の 説明 は 以下 の と 
お り で ある . 


Random_Exp.java の メソ ッ ド (random_Exp) : 


1 pub1ic static doub]e random_Exp() て 
芝 return -Math.1og(Math .random() ) : 
3 + 


1. L1 へ 3: メソッド random_Exp の 定義 で ある . 
2. LT2: 式 (11.4) で ある が , メソ ッ ド Math.random が [0, 1) の 一 様 分 布 乱数 な の で , 
Math.log の 引数 は 1- ヶ と 同等 な 7 に し て ある . 


図 11.3 の 下図 は 分 布 関数 7(z) = e-” で あり , 上 図 は 累積 分 布 関数 p(>) = ユー e~? 
で ある . そこ で , 発生 させ た 乱数 7 の 値 を 上 図 の 縦 還 こと り , グラ フ ア (?) = ミユ ーe~? 
で 対応 させ る z の 値 が 標準 指数 分 布 型 乱数 の 値 と な る . 当然 の こと で ある が , ヶ が 一 
様 に 分 布 し て いる の で , 対応 する z は 値 の 小さ いと ころ に 多く 分 布 し て いる 




















図 11.3 分 布 関数 7(Z) = e~" と 累積 分 布 関数 (>z) = ユーe~". 上 の 図 の 縦 軸 上 の 7 は 発生 さ 
せ た 乱 数 で あり , ァ ー ア (z) で 対応 する ゥ ぁ = ア ー「(7) が 標準 指数 分 布 の 乱数 と な る . 
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11.2.2 ロー レン ツ 型 分 布 乱数 


ロー レン ツ 型 分 布 関数 の 一 般 型 は 


T 1 


パー 天宮 P/22 


(11.5) 








9 
で の 値 の 半分 と な る 幅 で あり 半値 幅 と いわ れる . T=1 の 場合 の 式 (11.5) の 累積 分 布 
関数 は 


で あぁ る . ャ ー よ の と ぎの 関 数 の 値 は (> ) (0) あぁ る か ら .T は 関数 値 が 原点 











半生 1 人 
1 ーtan 十 05 (11.6) 


で ある か ら , この 関数 の 下限 値 が (-oo) = 0 を 乱数 * の 下限 値 0 に, 上 限 値 が (oo) = 1 
を 7r の 上 限 値 1 に 対応 させ て 線形 関係 を 作れ ば , z の 分 布 は ロー レン ツ 弄 分布 に な る . 
そこ で ロー レン ツ 型 分 布 乱数 は , 式 (11.6) の 逆 関 数 を と れ ば よい か ら , 

















ァ ニ アー!(7) =tan( テ 一 0.5)z (11.7) 





と な る . 図 11.4 は ロー レン ツ 弄 分布 乱数 の 分 布 で ある . z の 刻み は 0.12 で , 発生 させ 
た 乱数 の 数 は 10 万 で ある . 

プロ グラ ム (Random _Lorentzian.java) の メソ ッ ド (random_Lorentzian) と , その 説明 
は 以下 の と お り で ある . 





Random_Lorentzian.java の メソ ッ ド (random_Lorentzian) : 


1 pub1ic static double random_Lorentzian() て 
の return Math .tan( (Math . random( ) -0 . 5) *Math . PT ) : 
3 + 


1. L1 へ 3: メソ ッ ド random_Lorentzian の 定義 で ある . 
2. L2: 式 (11.7) で ある . 





EE 。 = 二 nm2 を 放 すえ 





図 11.4 逆 関 数 法 で 求め た ロー レン ツ 型 分布 乱数 の 分 布 . z の 刻み は 0.12 で , 発生 きせ た 乱 
数 の 数 は 10 万 で ある . (Z11_04_lorentzian.java) 
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11.2.3 正規 分 布 乱数 


正規 分 布 関数 は , 平均 が 0 で 標準 偏差 を ヶ と する と 
7 ニニ "2 (11.8) 


ー V2zo 


で ある . 累積 分 布 関数 は 


。 9 (9 =05+ / 7 の Ow 


ce の"/2g? oo (z/c)2 和 1 
ー 5 vV2r 人 1-3…(3+ リ 
で ある か ら , この まま で 逆 関 数 を 作る こと は で き な い . そこ で , 解析 的 に 累積 分 布 関 
数 の 逆 関 数 を 作る こと を や め , 数 値 積分 で 累積 分 布 関数 の 表 を 作り , ヶ に 対応 する 値 
を 参照 し て ぁ と する 表 読 み 取 り 法 を 使え ば , 原理 的 に は あら ゆる 場合 に 逆 関 数 法 が 使 
える . し か し , 正規 分 布 関数 の 場合 に は 以下 に 述べ る ボッ クス ・ マ ー ラ ー 法 が ある . 
この 方 法 で は , 累積 分 布 関数 が 使え る 先 の 標準 指数 分 布 の 式 を 使っ て お り , 極め て 
巧妙 な 方 法 で ある . 標準 指数 分 布 関数 e-? の 定義 域 は 0, oo) で あり , 正規 分 布 関数 
e-? の 定義 域 は ( - coo) で ある か ら , その まま で は 対応 を 付け られ な い . いま 。, 


げ (z, 9) = e) +972 (11.10) 








(11.9) 









































と 置い て , これ を で 徒 分 する と 


/ 7(?, の d9 = の e ず qp 


ーーV2re“/2ー2z の ー 27 げ (Z) 
と な り , 正規 分 布 /(x) に な る . 同様 に , げ (z, y) を z で 積分 する と 正規 分 布 / ゅ ) に な 
る . そこ で , 分 布 関数 げ ( ヶ , 9) = e-("+ の 72 の 乱数 を 使え れ ば , y の 値 に は か か わら ず 
ァ の 値 は 正規 分 布 乱数 で あり , > の 値 に は か か わら ず ? ヵ の 値 も 正規 分 布 乱数 で ある . 


次 に 





(11.11) 














(2 の ) 








の の (11.12) 
と 置く と , 式 (11.10) は 
げ ⑰) = ニア (11.13) 





と な る か ら , 標準 指数 分 布 の 累積 分 布 関数 の 式 (11.4) を 使う こと が で きる . 具体 的 に 
正規 分 布 乱数 を 作る に は , 1 個 目 の 乱数 」 か ら 標 準 指数 分 布 乱数 ゎ を 作っ て 動 径 座標 
に 使い 2 個 目 の 乱数 y。 か ら 範 囲 が (0, 2z) の 角 座 標 値 を 作る . その 値 ( ヵ , の ) を 直交 
座標 (z, y) に 変換 すれ ば , z お よび ? ヵ の 値 が 正規 分 布 乱数 と な っ て いる . すなわち 













































































り ー アバ (mm) ニ ーlog1 一 n) 
9 = ニ 2777 っ 

(11.14) 
々 三 YY2pcos の = ソー2log(1 一 7m) cos の 


9 ビ V2psin9= ツー2log(1 一 還 )sin 
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で あり , 乱数 を 2 個 使 っ て いる が , y と ヶ の 両方 を 使う こと が で きる の で , 効率 は 落 





ち て いな い . 図 11.5 は この 方 法 で 作っ た 1 
プロ グラ ム (Random_Normal.java) の メソ ッ ド (random_Normal) の 一 部 と . その 





明 は 以下 の と お り で ある . 


E 規 分 布 乱数 の 分 布 で ある . 


惜 


Random_Normal.java の メソ ッ ド (random_Normal) の 一 部 : 


1 boo]ean Sw= て tTUG: 


double p, th: 


pub1ic doub]e random_Norma1(double sigma) て 
if (sw) { 


p= sigma*Math . sqrt(-2.0*Math.1og(1 .0-Math .random() ) ) : 
th= 2.0*Math .PT*Math .random() : 
return p*Math . cos (th) : 


} el1se て 


2 
3 
4 
5 Sw= fa]se: 
6 
7 
8 
9 


10 SW て t エ UG: 
il return p*Math . s1n(th) : 











1. L1, 2: 式 (11.14) の x と y を 交互 に 求め る た め に , 論理 型 変数 sw を 使い 、 その 
初期 値 を trune に し て お く . 変数 p, th は sw が false の と き に は , 前 の 値 を 使う 














の で , メソ ッ ド の 引 





で 定義 せ ず に 外 で クラ ス 内 に 出し て お く . 





2. L3: メソ ッ ド random_Normal の 定義 で ある . 引数 sigma は 正規 分 布 の 標準 偏差 
で あり , 戻り 値 は 正規 分 布 乱数 で ある . 











0 SN が 愉 の 





L4: 論理 変数 sw を 調べ る . 
L5: sw の 値 が 真 で あっ た ら , 次 回 の た め に sw を false に する . 
L6, 7: 式 (11.14) の ゎぁ,9 を 計算 3 
L8: 戻り 値 と し て 式 (11.14) の を 返す . 
L10: sw の 値 が 偽 で あっ た ら , 次 中 
L11: 戻り 値 と し て 式 (11.14) の を 返す . 


























する . 


の た め に sw を true に する . 








図 11.5 ボッ クス ・ マ ー ラ ー 法 に よる ji 


させ た 乱数 の 数 は 10 万 で ある 





E 規 分 布 乱数 の 分 布 . ヶ = 1.0 で の 刻み は 0.02, 発生 





(Z1 1_.05_siekibunpu.] ava) 
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11.2.4 球面 一 様 分 布 乱数 


半径 1 の 球面 上 の 座標 は 3 次 元 極座標 の 9 の, ぁ で 表す こと が で きる . 一 様 に 分 布 す 
る 乱数 を 座標 (の, ゐ の) の 値 で 作る 際 に , ゅ に つい て は 範囲 を (0, 27) に 拡張 する だ け で 
よい が , 9 に つい て 一 様 に と る と 両極 9 = 0.zr の 付近 で 密 に な り , 赤道 9= ァ /2 の 付 
近 で 疎 に な っ て し まう . その 比率 は ーー で ある . し か し , ヶ ーcos9 を 一 様 に と れ ば 」 
|dz| = sin 9d49 で ある か ら 球 面 上 の 方 向 で も 一 様 な 分 布 と な る . そこ で , 2 個 の 乱数 
75 を 作り , それ か ら 座 標 (の. の) を 作る と , 





















































ーー sin~`(2(7」 一 0.5)) 


の 
の = 2zy5 (11.15) 
で あり , 座標 (z, ぁ ヵ , 2) を 作る と 
々 三 2(mー0.5) 
9 三 sin の sin の (11.16) 
Z 三 sin の cos の 
で ある . 

















鎖 11.6 は 4.000 組 の 座標 を 3 次 元 の 球面 上 に プロ ッ ト し た も の で ある 
プロ グラ ム (Random_Sphere.java) の メソ ッ ド (random_Sphere) と 。 そ の 説 明 は 以下 
の と お り で ある . 


Random_Sphere.java の メソ ッ ド (andom_Sphere) : 


1 pub1ic doub1e[] random_Sphere(doub1e r) て 
必 double[] ans= new doub1e[3] : 

3 doub1e pi2= 2*Math . PT : 

4 doub1e ph= Math .random()*p12: 

5 doub1e = (Math .random( ) -0.5)*2: 

6 doub1e r1= Math. sqgrt(1 .0- シ キン ) : 

7 ans [0] = r*r1*Math .cos(ph) : 











図 11.6 球面 一 様 分 布 乱数 の 分 布 . 3 次 元 球面 上 に 一 様 に 分 布 し た 点 を 投影 し た 図 で ある 
(Z1 1_.06_sphere.) ava) 
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8 ans [1] = r*r1*Math . sin(ph) : 
9 ans [2] = エネ z: 

10 return anS: 

11 + 





1. L1 て 11: メソ ッ ド random_Sphere の 定義 で ある . 引数 + は 球 の 半径 で あり , 戻 
り 値 は 球面 一 様 分 布 乱数 ( ヵ , ヵ , z) の 配列 で ある . 

L2: 戻り 値 (z, 9, >) の 配列 ans の 定義 で ある . 

L4: ゅ を 算出 する . 

L5: 9 の 代わ り に > ヶ を 算出 する . 

L6: 赤道 面 上 で の 動 径 を 求め る . 

L7 て 9: 戻り 値 (z, ヶ , z) を 配列 ans に 代入 する . 

L10: 戻り 値 ans を 返す . 




















5 oO 8 っ 店 





11.2.5 表 読 み 取り 法 





これ まで に 述べ た 標準 指数 分 布 は 単純 な 累積 分 布 関数 が ある の で , 標準 指数 分 布 乱 
数 を 簡単 な 変換 関数 で 作る こと が で きる . 正規 分 布 乱数 の 場合 は , 単純 な 累積 分 布 関 
数 は な い が , 巧妙 な 細工 を し て 作る こと が で きた . また , 革 面 一 様 分 布 乱数 は 変数 と 
し て >, ゅ を 使う こと で 作る こと が で きた . し か し , この よう な 細工 が で き な い 場合 に 
は , 数 値 積分 で 累積 分 布 関 数 の 表 を 作り , ヶ に 対応 する 値 を 参照 し て > と する 表 読 み 
取り 法 (table lookunp) を 使わ な けれ ば な ら な い . 元 来 , 乱数 の 研究 に は 長い 歴史 が あ 
り , それ は 優れ た 一 様 分 布 を 作る た め の 努 力 で あっ た . 表 読 み 取り 法 で は , いく ら 表 
を 細か くし て も 離 散 的 で ある か ら , この 攻 力 を 無視 する こと に な っ て し まう . し か し , 
普通 の 場合 に は 十分 役立つ で あろ う . 
区 11.7 は 任意 に 指定 で きる 分 布 乱数 の 発生 例 で ある . ここ で は 10 組 の (z, ヵ ) の 
デー タ 値 を 与え 、 その 累積 分 布 関数 を シン プ ソ ン の 積分 法 で 作り , 乱数 の 発生 を させ 
て いる . 座標 は [0, 500] の 範囲 を 100 分 割 し , 乱数 を 10 万 回 作っ て いる . o が 指定 し 
た デー タ 値 で あり , + は 各 座 標 値 に 分 配 さ れ た 乱数 の 数 で ある . 縦 軸 は 意味 が な い が 
指定 し た デー タ の 面積 と , 得 ら れ た 乱数 の 分 布 の 面積 が 同じ 値 に な る よう に 規格 化し 
て ある . この 分 布 は , 後 の 仮想 浅間 降灰 予測 の 図 11.9 の 作成 の 際 使わ れ て いる 
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図 11.7 任意 に 指定 で きる 分 布 乱数 の 分 布 . 10 組 の (>z, ヵ ) の デー タ 値 を 与え , その 分 布 を 
与え る 乱数 の 発生 を させ る . 座標 は [0, 500] の 範囲 を 100 分 割 し , 乱数 を 10 万 回 発生 きせ 
た . o は 指定 し た デー タ 値 で あり , + は 各 座 標 値 に 分 配 さ れ た 乱数 の 回 数 で ある . 縦 軸 は 意味 
が な く , 両 カ ー ブ に 同一 の 規格 化 を し て ある . (Z11_07 rand_table.java) 
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プロ グラ ム (Random_Function.java) の コン スト ラク タ (Random_Function) や メソ ッ 
ド (random_Function) と その 説明 は 以下 の と お り で ある . 積分 関数 の 逆 関数 が わか っ 


て いる 場合 に は , コン スト ラク タ に 引数 は な い . 


Random_Function.java の メソ ッ ド (random_Function) の 一 つ で , 欲し い 分 布 の 型 を 
表す 関数 の 累積 分 布 関数 で ある 原始 関数 (積分) の 逆 関数 が わか っ て いる 場合 : 


1 pub1ic doub1e random_Function(MyFunction f) { 
2 return f .function (Math . random( ) ) : 


久  』# 


1. L1 へ 3: メソ ッ ド の 定義 で ある . 引数 の f は イン タフ ェ ー ス MyFunction クラ ス 
の イン スタ ンス で あり , 欲し い 分 布 の 型 を 表す 関数 の 累積 分 布 関数 の 逆 関 数 定義 





し て いる . 戻り 値 は 座標 値 の 乱数 で ある . 





2. L2: 連 積 分 布 関数 の 逆 関数 に 乱数 を 与え 、 欲し い 分 布 関数 で の 座標 値 を 求め , 戻 


り 値 と し て 返す . 








累積 分 布 関数 の 逆 関 数 が わか ら な い 場 合 に は , コン スト ラク タ で 初期 処理 を する 必 


要 が ある . 


Random_Function.java の コン スト ラク タ (Random_Function) の 一 つ で , 
数 の 逆 関 数 が わか ら な い 場 合 に は , 累積 分 布 関数 の 逆 関 数 の 表 を 作っ て , 


うに し な けれ ば な ら な い . 





Random_Eunction.java の コン スト ラク タ (Random_Function) の 一 つ : 


1 int np: 
2 doub1e[] integ_f: 
3 publ1ic Random_Function(int np, MyFunction f) { 
4 this .np= nD: 
5 integ_f= new doub1e np] : 
6 doub1e xd: 
MM doub1e dx= 1.0/(np-1): 
8 doub]e dx2= dx/2: 
9 doub]e dx6= dx/6: 
10 integ_f[0]= 0.0: 
il for (int i=1: 1<np: ュ ++) て 
1 xd= (i-1 ) *dx : 
13 integ_f [1i]= integ_f[i-1] 
14 +(f .function(xd)+4*f .function(xd+dx2) 
5 +f .funct1on(xd+dx) ) : 
16 + 
17 doub1e wnorm= 1.0/integ_f [np-1] : 
18 for (int i=1: 1<np: ュ ++) て 
19 integ_f[1] *= wnorm: 
20 # 
の 串 


1. L1, 2: 広域 的 変数 np と 累積 分 布 関数 の 配列 integf を 宣 


田 


電 す る . 


連 積 分 布 関 
読み 取る よ 
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10. 


中 


oo の の た 


L3 て 21: コン スト ラク タ の 定義 で あり , 引数 の np は 分 布 関数 の 座標 の 両端 を 合 
め た 等 分 割 点 数 で あり , f は イン タフ ェ ー ス MyFunction クラ ス の イン スタ ンス 
で あぁ あり, 分布 関数 を 定義 し て いる 

L4, 5: 引数 の np の 値 を 広域 的 変数 this.np に 渡し , 広域 的 配列 integkf の イン 
スタ ンス を 作る . 

L7: z 座標 の 刻み 幅 を 求め る . 

L8,9: シン プ ソ ン 積 分 の た め の 定 数 . 

L10: 累積 分 布 関数 の 最小 値 を ゼロ と する . 

L11 て 16: 累積 分 布 関数 作成 の ルー プ で ある . 

L12: 1 区 間 の シン プ ソ ン 積 分 の 始点 の 座標 値 

L13 て 15: 1 区 間 の シン プ ソ ン 積 分 を 行い , 直前 の 配列 の 値 に 加え て , 累積 値 と 
する . 
L17: Math.random で 作ら れる 値 の 範囲 が [0, 1) で ある か ら , 最終 値 が 1 と な る 
よう に 規格 化す る た め の 規 格 化 因子 を 作る 

L18 て 20: 規格 化 を 行う . これ で 累積 分 布 関数 の 表 が で き あ が る . 

































































Random_Eunction.java の メソ ッ ド (random_Eunction) の 一 つ で , 積分 関数 の 逆 関数 
が わか ら な い 場 合 : 


1 
ウ 
3 
4 
5 
6 
7 
8 
9 
10 
iL 
1. 
2 
3 
4 
5 


pub1ic doub]e random_Function() + 
doub1e r= Math.random() : 


doub1e xd: 


doub1e dx= 1.0/(np-1) : 


30 お 二 清 3 
for (i=1: 1<np-1: ュ ++) て 


if (r<integ_f [1] ) break: 


xd= (ュー-1 ) *dx : 


return (xd+dx*(r-1nteg_f [1 ュ -1] ) /(integ_f [1] -integ_f [i-1] ) ) : 








L1 て 11: メソ ッ ド random_Function () の 定義 で あり , 戻り 値 は 座標 が [0, 1) の 
範囲 に 変換 され た 乱数 値 で ある . 

L2: 一 様 乱数 の 値 を r に 代入 する . 

L4: 座標 の 刻み 幅 を 決め る . 

L6^8: 表 の 読み 取り を 行う . 乱数 値 が 累積 値 を 超え た ら , その 乱数 は 超え た 点 
以下 の 1 区 間 に あ る こと に な る . 

L9, 10: 座標 値 は 乱数 値 が 累積 値 を 超え た 点 以下 の 1 区間 に ある か ら , 線型 送 内 
挿 式 で 座標 値 を 決定 し , 戻り 値 と し て 返す 



























































プロ グラ ム (Z11.07 rand_table.java) の メイ ン メ ソ ッ ド の 一 部 と , その 説明 は 以下 の 
と お り で ある . 


Z11_07rand_table.java の メイ ン メ ソ ッ ド の 一 部 : 


1 
の 
3 


1nt nx=101: 
double [] x= new doub1e [nx] : 
doub1e[] y= new doub1e [nx] : 


6. L13 て 16: 分 布 乱数 を 作り , 


11.2 関数 型 分 布 乱数 199 


doub1e dx= (xmax-xmin) / (nx-1) : 
for (int i=0: 1<nx: ュ ++) 
[1] = xm1n+i*dx: 
yi1]= 0.0: 
が # 
MyFunction mf= new Func() : 
Random_Function rf= nevw Random_Function(nx , mf) : 
int nmax= 100000: 
lil 語 に 1 
for (int ]j=0: ]<nmax: j++) { 
k= (int) (rf .random_Function() *nx) : 
ylk]+= 1.0: 
+ 





L1: 分 布 関数 の 範囲 は .。 すでに xmin, xmax で [0.0, 100.0] に 指定 し て あり , こ 
こ で 刻み 数 を 指定 する . 


























2. L2, 3: 分 布 関数 の 刻み の z 座標 と . 戻さ れる 乱数 値 が 当て は まる z 座標 に 累積 














され る 度数 の 配列 y の 定義 を する . 

L4^ て 8: 座標 x と 度数 y の 初期 化 を 行う . 

L9, 10: MyEunction の イン スタ ンス を 作り , それ を 使っ て Random_Function の 
イン スタ ンス を 作る . 

L11: 乱数 を 10 万 個 作 る . 
































ヒ 
1 


て は まる 添 字 番号 と し て y に 1 を 電 積 する . 





l 


プロ グラ ム (Z11_07.rand_table.java) の クラ ス (Z11_07 rand_tableCommon) と (Func) , 
お よび その 説明 は 以下 の と お り で ある . 


Z11_07_rand_table.java の クラ ス (Z11_07 rand_tableOommon と Func) : 


+} 


1 
み 
に 
4 
5 
6 
7 
8 
9 


10 
11 


class Z11_07_rand_tab]eCommon 
doub1e xm1in, xmax: 


class Func extends Z11 07_rand_tab1eCommon implements MyFunction て 
Lagrange 1]a= nev Lagrange() : 
pub1ic doub1e function(doub1e x) て 


doub1e xw= xmin+x*(xmax-xmin) :// [0,1] ->[xmin ,xmax] 
doub]e [] xdq= {0,2.5, 5,10,30,80,120,170,240 ,400 ,xmax+ : 
double[] yd= {0, 3,4.6, 6, 7, 7, 6, 4, 2, .2, 0+: 
return 1a.1agrange(xw ,xd,Yyd,0,xd.1ength-1 ,3) : 














L1 て 3: メイ ン メ ソ ッ ド と クラ ス Func と で 共通 に 使う 変数 xmin, xmax を クラ 
ス 変数 と し て 定義 むす る クラ ス Z11.07rand_tableCommon を 作る 

L4 て 12: 分 布 関数 を 与え る Func クラ ス の 定義 ペク ラス Z11_07 rand_table 
Common を 継 若 し . イン タフ ェ ー ス MyFunction を 実装 する 























3. L5: ラグ ラン ジュ の 内 挿 法 を 使う た め に , イン スタ ンス を 作る 
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4. L6 て 11: イン タフ ェ ー ス MyEFunction の 抽象 メソ ッ ド function を オー バー ライ 
ド し て , 関数 を 定義 し て いる . 

5. L7: 引数 x は [0, 1) で 与え られ る か ら , 際 の 範囲 [xmin, xmax) に 変換 する . 
L8 て 10: 関数 を デー タ で 与え て いる の で , ラグ ラン ジュ の 内 挿 法 で 関数 値 を 求め 
て いる . 









































11.3.1 ビュ フォ ン の 針 


図 11.8 は ビュ フォ ン の 針 の 問題 で ある . 左 図 は 紙 の 上 に 間隔 1 の 線 を 多数 引き , 長 
さと <1 の 多数 の 針 を 無 作為 に 落と し た と き の 図 で あり , 針 が どれ か の 線 と 交わ る 
確率 は 2 ん /r に な る . ここ で 行っ た シミ ュ レ ーション で は , 間隔 が 1 の 線 を 5 本 引き , 
針 の 中 心 を > 軸 に つい て も ヵ 軸 に つい て も (2,2) の 範囲 に ラン ダム に 落と す よ うに 
し た . 針 の 向き も ラン ダム で ある . 

確率 を 求め る 数 学 は , 以下 の と お り で ある . ? 軸 方 向 に つい て は ヶ 依存 性 は な いか 
ら , 考慮 する 必要 は な い . z 軸 方 向 に つい て は 周期 1 の 周期 性 と , 各線 に 関す る 左右 
の 対称 性 。 針 の 向き の 上 下 の 対 称 性 を 考慮 する と z 軸 に 関し て 針 の 中 心 が (- 0) 
に 落ち て , 針 の 向き が 右上 を 向い て いる 場合 で 考慮 すれ ば よい こと に な る . そこ で , 
長 さ と の 針 が 線上 に 落ち る 確率 は , 右 図 の よう な 作図 を する と 


2 6 1/2 
2 っ e+ / 0dz 
0 。 7/2 と /2 


の 2 / 全 9 
ーー 一 の sin 9d9 ニ ーー 9sin 9d9 ニ ーー 
尋 / 0 旭 
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(11.17) 
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と な る . ここ で は , cos9= 5 直 ニ こち an6d2 と / gng9 ニコ を 使っ た . 右 
ヵ /2 の し 
Y 
バ 
X 
2 
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11.8 ビュ フォ ン (Buffon) の 針 . 左 図 は 紙 の 上 に 間隔 1 の 線 を 多数 引き , 長 さ ん <1 の 多 
数 の 針 を 無 作為 に 落と す と , 針 が どれ か の 線 と 交わ る 確率 は 2//r に な る . 右 図 は この 確率 を 
数 式 で 求め る と き の 補 助 の 図 で ある . (Z11_08_buffon.java) 





















































本 





で ある . 


図 の 円 は , 
心 と 実線 と の 呈 


針 の 中 心 が 円 の 中 心 に 落ち た と き の 針 が 存在 し 得る 領域 で ある . > は 








この と き 





実際 は 線 は 動か ず 


り で ある . 






































旭 /2 











が 移動 する は ず で ある が , 円 
する と 考え た ほう が わか りや すい で あろ う 
プロ グラ ム (Z11.08_-buffon.java) の メイ ン メ ソ ッ ド の 一 部 と 、 その 説明 は 以下 の と 』 


Z11_08_buffon.java の メイ ン メ ソ ッ ド の 一 部 : 


〈 〇 CO の の 中 の ODD は 


CO ト DD 和 ト DD hbD DD DDD DD は は ビビ ビビ ビビ ビー ビー ビ 
の 〇 OQO の 心 の いい は の OO の の 中 の いい は の 


double 
double 


1nt 1n= 


double 
double 
double 
double 
double 
double 
double 
double 


for (]=0: ]<max: ]++) { 
メ = x]*Math .random( ) -x12: 
y= 71*Math .random()-y12: 
Math .PT*Math . random( ) -pi2: 
Math . cos(theta) : 
Math . sin(theta) : 


theta= 
COSth= 
S1nth= 


D1x= 
D2x= 
p1y= 
p2y= 


Length= 0.5: 
L2= Length/2: 
0} 


メ ]= (xmax-xmin-1 ) : 


x12= x1/2: 


y1 ユ = (ymax-ymin-1) : 


y12= 71/2: 
theta : 
p12= Math.PT/2: 


pl1x, p2x, D1Yy, p27: 


costh, sinth : 


メ +1.2*costh: 
メー1.2*coSth: 
7+L2*sinth : 
7ー-L2*sinth : 





11.3 シミ ュ レ ーション 





























if (] く <100) gk.g]oin(p1x, p1y, p2x,p27) : 


for (=ー-2: 1 ユ く <=2: ュ ++) て 


メニ 


1f (p2x<=x &&z x く <=p1x) { 
1n++: 


中 2 


break : 


+ 
# 


1. Ll: 縦 線 の 間隔 を 1 と し て ある の で , 針 の 長 さ を 間 


定 する . 


の の FR 96 


L6, 7: 針 の 
L12 て 30: 針 を 落と す 


L2: 針 の 長 さ の 半分 
L3: ヒッ ト し た 数 を 数 える カウ ンタ 変数 を ゼロ で 初期 化す る . 
L4, 5: 針 の 中 心 が 落 ちる x 軸 上 の 幅 xl と その 半分 の xi2. 
心 が 落 ちる y 軸 上 の 幅 yl と その 半分 の yj2. 
回 数 だ け ま わす ルー プ . 

















の 


語 
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の 
E 離 で も あり. の は ヶ 軸 か ら 上 向き に と っ た 円 と 直線 と の 交点 まで の 角 
針 が 実線 に 乗る 確率 は - で ぁ る . > 








軸 で の 積分 を する 際 に は . 
は 動か ず 線 が ゼロ か ら 1/2 まで 移動 





O? 


半分 に する た め 0.5 を 指 
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7. L13, 14: 針 の 中 心 が 落 ちる z 座標 と ヶ 





8. L15: 針 の 向き の 角度 














過 








9. L18 へ て 21: 針 の 先端 p1 と 未 端 p2 の 座標 の 計算 . 




















10. L22: 便宜 上 100 回 以下 な ら 針 を 表示 する . 











11. L23 へ て 29: 線 の 数 だ け ル ー プ を まわ 


べ る . 





12. L24: 線 の 位置 を x に 代入 する . 
13. L25 へ 28: 針 の 未 端 が 線 よ り 左 に あり , 先端 が 線 よ り 右 に あれ ば , 針 は 線 に 触 
れ て いる か ら , カウ ンタ に 1 を 加え , ルー プ を 抜け て 針 を 落と す ル ー プ を 結 0 


返す . 


14. L30: 針 を 落と す ル ー プ の 終了 . 


11.3.2 仮想 浅間 降灰 予測 





図 11.9 は 風速 4ms-! ( 左 図 ) と 8ms-! ( 諾 














し , 針 が 線 の どれ か に 触れ る か どう か を 調 





図 ) の 北西 の 風 に よる , 仮想 浅間 の 降灰 の 


分 布 予測 図 で ある . 同心 円 の 刻み 幅 は 20 km で ある . 与え る パラ メー タ は , 風 上 の 向 
き と 風 速 で ある . 原点 か ら の 距離 に 対す る 降灰 量 は , 図 11.7 に 示し て ある 分 布 乱数 を , 


風速 5ms-+ の と き の 分 布 と し , 風速 ぃ ms-+ の 場合 は , 距離 の 値 を Vi 人 穫 す る こと に 
し て いる . すべ て の デー タ や 関数 は 仮想 の も の で あり , 現実 の 理論 や デー タ を 利用 し 





て いる わけ で は な い . 



































風速 の 弱い 場合 は , 分 布 が 広がる 角度 が 大 きく な る よう に し て ある . その 説明 は 以 
下 の と お り で ある . 噴煙 は 原点 で 等 方 的 に 起こ り , その 後 , 軽い 粒子 ほど 風 に 乗っ て 
遠 距 離 ま で 飛ん で いく . そこ で , 原点 を 放物線 の 焦点 と し , その 放物線 の 内 側 に 多く 


分 布 す る と する . その 角度 分 布 は , 











E 規 分 布 と し , 放物線 の 中 心 線 を 分 布 の 中 心 、 両 


側 の 放物線 を 正規 分 布 の 2 と し て , 正規 分 布 型 の 乱数 を 使う . 














で あり , その 了 図 は 図 11.10 で ある . 














焦点 が 原点 (0.0) に , 頂点 が (0, -c) に ある 放物線 の 方 程 式 は 


(11.18) 


半径 7 の 円 と の 交点 は , 











11.9 仮想 浅間 降灰 予測 . 風 上 の 向き と 風速 を 指定 し て 降灰 分 布 の 予測 を 行う . 風 上 は 両 








図 と も 北 か ら 西 へ 605 で あり , 風速 は 左 図 
み 幅 は 20km で ある . 














で は 4ms~「, 右 





較 




















で は 8ms~「 で ある . 同心 円 の 刻 
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図 11.10 焦点 を 原点 に 置く 放物線 と 円 の 交点 の 関係 . 


三 1 2 di の 
7ー ae (11.19) 
y2 1 072 ニー ィ 2 























の 解 ( よ Y4c7ーg), ァ 7ー 2c) た だ し 7r>c で あり , 中 心 線 か ら の 角度 は , 








9 = cos~~ ( 央 当 (11.20) 
と な る . 速度 ゎ と c の 関係 は 適当 で あり 

c 王 10- き 9ー10)-1 (11.21) 
と し て いる . 


プロ グラ ム (Z11.09_MtAsama.java) の メイ ン メ ソ ッ ド の 一 部 と , その 説明 は 以下 の 
と お り で ある . 


Z11.09_MtAsama.java の メイ ン メ ソ ッ ド の 一 部 : 


1 doub]e vV= 4: 

必 doub1e sca]e= Math.sqrt(V/5) : 

3 doub1e wind= -60: 

4 doub1e wind_rad= wind/180*Math . PT : 

5 double r, c, theta: 

6 中略 

7 doub1e X, ず , S1nW, COSVW: 

8 int ュ : 

9 中略 

10 1nt npo1nt=201 : 

員 | MyEFunction mf= new Func() : 

12 Random_Function エ f= new Random_Function(npoint , mf) : 
jl) c= Math.pow(10.0, -(Y-10)/3-1) : 

14 for (i=1: 1<ndot: ュ ++) て 

15 ェ = rf .random_Function() * npoint * scale: 
16 if (r<c) { 

17 theta= 180.0: 

18 + e1se て { 

19 theta= Math.acos(1-2*c/ エ ) : 
20 + 
21 Random_Norma] rn= new Random_Norma1 () : 
22 も theta= rn.random_Norma] (theta/2) : 
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演習 問題 





メニ ェ *Math . sin(theta-w1nd_rad) : 
y= -r*Math .cos(theta-w1nd_rad) : 
gk.gmark(x, りす ): 


L1 て 5: 風速 . 風向 き 等 の 指定 を する . 
L10: 動 径 座標 の 刻み 数 を 決め る . 

L11: Func 型 イ ンス タン ス の 作成 を する . 
L12: 座標 の 刻み 数 と Func 型 イ ンス タン ス を 引数 と し て Random_Eunction 型 の 
イン スタ ンス を 作成 する . 

5. L13: 式 (11.21) に よる 放物線 の 頂点 の 位置 を 決め る . 

6. L14 て 26: 指定 し た 点 の 数 ndot だ け ル ー プ を まわ す 

7. L15: 指定 し た 分 布 関数 に よる 乱数 を 使っ て , 動 径 座標 を 決め る . 
8 

9 








必 9 5 選 



































L16 て 20: 動 径 座標 に 依存 する 角度 分 布 の 範囲 を 指定 する . 
L21, 22: 正規 分 布 乱数 を 使っ て , 角度 座標 を 決定 する 


10. L23 て 25: z, ヶ 座標 を 求め 点 を 描画 する . 




































































11. 


| 














11.2 

















乱数 を 使っ た ヒッ ト ・ オ ア ・ ミ ス 法 の プロ グラ ム Z11_.01_monte.java を 変更 
し て , じゃ ん けん の プロ グラ ム Q11.01 Z11.01 janken.java を 作り な さい . 二 人 
の 名 前 は a さん と b さん で , 乱数 の 値 が [0, 9] な ら 「 ぐ う 」, [2,c) な ら 「 ち ょ 
き 」, [ce.1) な ら 「 ば ー」 と する よう に , 前 も っ て ソー スプ ログ ラム で 配列 に 
a さ ん と b さ ん の と c の 値 を 代入 し て お き な さ い . a さん を 横 軸 . b さん を 
縦 輔 ことり, 1 回 の じゃ ん けん ご と に 乱数 値 を 座標 値 と し て マー ク を プロ ッ ト 
し , その 色 は a さん が 勝っ た ら 赤 .b さん が 勝っ た ら 再 と し , 「 あ いこ 」 の 場合 
は 黄色 と し な さい . じゃ ん けん の 回 数 ヵ は 適当 に 指定 する こと . 
解答 例 : ソー スプ ログ ラム Q11_01_Z11.01.janken.java 





















































前 間 11.1 の プロ グラ ム を 変更 し て , Q11_.02_Z11.01.janken.java を 作り , キー 
ボー ド か ら a さ ん と b さ ん の と c の 値 を , 「 何 割 」 の 単位 で 入力 する よう に 
し な さい . この プロ グラ ム は , 入出 力 が ある か ら html 文書 と し て は 使え な い . 

解答 例 : ソー スプ ログ ラム Q11_02_Z11_01.janken.java 











第 12 章 
スプ ライ ン 関 数 と 作図 






































これ まで 扱っ た 補間 法 お よび 関数 近似 と 平滑 法 に お いて , スプ ライ ン 関 数 を 使う 方 
法 も 取り 上 げた が , ここ で は スプ ライ ン 関 数 の 基礎 に つい て 解説 し . 作図 へ の 応用 例 
を 述べ る . 計算 機 で 図 を 描け る よう に な っ た 1970 年 代 半 ば まで , 図 は 主 に 手書き で 行 
われ て いた . 紙 の 上 に 曲線 を 描く 場合 に は , 適当 な 間 隔 で 点 を プロ ッ ト し , 順次 , 並 
ん だ 4 点 が 乗る よう な 雲 形 定規 ! を 選ん だ り , ある い は , 4 点 を 通る よう に 滑ら か に 曲 
げ る こと の で きる 自在 定規 を 使っ て , 4 点 の 内 部 の 2 点 間 の み で 線 を 描く 作業 を 繰り 
返す こと で 行わ れ た . スプ ライ ン と は 自在 定規 を 意味 する 言葉 で あり , 実際 の 自在 定 
規 を 使っ て 描か れる 曲線 は , 3 次 の スプ ライ ン 関 数 に 相当 し て いる . 
広い 領域 の 多く の デー タ 点 を 使っ て , 関数 近似 や 補間 を する 場合 に . ラグ ラン ジュ 
の 方 法 な ど で は , 1 個 の 多項式 を 使う と 高い 次 数 が 必要 と な り , 余計 な 振動 が 入っ て 
精度 が 良く な いこ と が ある . 使用 する デー タ 点 の 数 を 少な くし て , 局所 的 に ラグ ラン 
ジュ の 方 法 を 適用 すれ ば 関数 値 と し て は 精度 を 上 げ る こと が で きる が , 広い 領域 に わ 
た っ て 見 る と , 両側 で 異な っ た 多項式 を 使う デー タ 点 に お いて は , 左右 の 微分 値 が 一 
致す る と は 限ら ない. 一 方 . ス プラ イン 関数 で は , デー タ 点 (正確 に いう と 節点 ) に お 
いて も ぁ 次 式 の 場合 に は ヵ ー1 階 微分 まで 可能 と な っ て いる . し か し , スプ ライ ン 関 
数 の 次 数 を 上 げ る と , 処理 時 間 が 大 幅 に 増え る の で 3 次 の スプ ライ ン 関 数 が 手頃 で あ 
り , それ が 多く 使わ れ て いる . 

スプ ライ ン 関 数 の 要点 を 一 言 で いう な ら , それ は 切断 べき 関数 に ある と いえ よう . 
まず , 切断 べき 関数 に つい て 述べ る 

























































































































































































































































































12.1 切断 べき 関数 








ヶ 三 と を 節点 と する ヵ 次 の 切断 べき 関数 の 定義 は 


。。 人 っ 0 (>8 
eg 1 98 (12.1) 














+・ 多様 な 曲線 か ら 作 られ た 定規 の セッ ト が あっ た . 
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12.1 








妊 











で ある . 図 12.1 は 節点 ほ =0 に お ける 3 次 の 切断 べき 関数 で ある . 








いま , = を の 両側 で 異な る ヵ 次 式 で 表 さ れる 関数 が あっ た と する と , それ は 


5x(Z) = ニ (2) 十 e⑦ー8 條 





(9) 


で 表す こと が で きる . ここ で , ,(?) は <E で 成り 立つ ヵ 次 式 で あり , c を 適当 に 決 
め れ ば , 用 。(?) 十 c(z 一 7 は > と を で 成り 立つ ヵ 次 式 と する こと が で きる か ら で あ る . 


節点 が ?= ニ 1 て レル の ヶ 個 ある 場合 に , 





(<?) = (の 2 し ee 


を 作る こと が で きる . ここ で , 


5 (2) 5 1 ュ ( タ ) ニモ g(Zー 介 
と な る . この 式 (12.5) を ヵ 階 微 分 する と 


69 (の ーー 89 (ge) ニ gm 


77, 7 一 1 











と な る か ら , = と 置く こと に よっ て 











PT に 
ーー 56.1⑯】 
1 2 4 

ー ュ (22)-59.19) 


この こと を 繰り 返す か と, スプ ライ ン 関 数 


(12.3) 


(12.4) 


(12.5) 


(12.6) 


(12.7) 


と な る . これ で c, は 一 意 的 に 決ま る こと が わか っ た . c, を 具体 的 に 求め る に は 
式 (12.3) に 節点 で の 値 を 代入 し て 連立 方 程 式 を 解け ば よい が , これ は あま り 大 きく な 
い ァ の 場合 で も 条件 の 良く な い (il-conditioned) 連立 方 程 式 で あり , 計算 の 過程 で 桁 落 











ちの 誤差 が 大 きく 入っ て くる の で , この まま で は 実 / 





な 


=i Gi 


























HH 的 で は な い . そこ で , いろ いろ 
工夫 が な され て お り , 次 節 で は その 一 つ で ある B ス プラ イン に つい て 述べ る . 


節点 ほ を = 0 に お ける 3 次 の 切断 べき 関数 *< く 0 で ッッ = ニ 0. zz>0 で り =z" で あり 
ァ ー0 で も 2 階 微 分 まで は 連続 で ある . 


12.2 
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B スプ ライ ン 








スプ ライ ン 関 数 の 作り 方 に は いく つか の 方 法 が ある が , ここ で は よく 使わ れる B ス 
プラ イン を 取り 上 げ る . B ス プラ イン の 英語 は basis spline で あり , 局所 的 な 基底 関 
数 で ある . ヵ , 階 の B スプ ライ ン は , 十 1 個 の 節点 を 使い 、ー1 次 の 多項式 で ある . 
ここ で は , 4 階 (3 次 ) の スプ ライ ン 関 数 を 取り 上 げ る こと に する . その 定義 は 以下 の 
と お り で ある . まず , 各 8 に お ける 切断 べき 関数 

(あー (z < く ) 
0 人 縮 光 品 ) 
を 作る . 77(z) の 4 は 階数 妨 で あり , 1 は 使用 する 節点 の 数 7 は 使用 する 節点 の 
うち 最も 左 に ある 節点 , の 番号 で ある . 4 階 の スプ ライ ン 関 数 は , 切断 べき 関数 の 4 
階 の 差分 商 で あり , 





























47(*) =( ら 一 g) キ = (12.8) 












































47 が 7(z) = 0 MT の A7 信 72(z) = ル AM 全 2(z) 一 72() 

ロー 7r2 一 拉 辻 
の か の ご り IO 
1 ー 9 7+4 2 所 


で 求め られ る 最後 の 7”.7(z) で ある . 

図 12.2 は 節点 が 。 か ら &。 まで で , 重複 節点 が な い 場 合 の Af7(z ヶ ) で ある . 最も 上 
の グラ フ は 8&。 か ら g。 まで の 7 個 の 3 次 切断 べき 関数 77(z) で ある . 最も 下 の グ ラ 
フ は &。 か ら &。 まで の 3 個 の 基底 関数 7(>) で も ある. 上 か ら 下 へ 節点 の 数 が 増す に 
従っ て 関数 の 数 は 1 個 ず つ 減 っ て いる . この 基底 関数 は 2 次 導 関 数 まで 連続 で あり , 
一 般 的 に 妨 階 で は 妨 ー2 次 導 関 数 まで 連続 で ある . 

希 12.3 は 重複 節点 が ある 場合 で あり , 節点 の z 座 標 は 0, 1, 1, 2, 3, 3, 3, 4, 5, 5, 5, 5 
で ある . 最も 上 の グラ フ は 3 次 式 が 使わ れ て いる 切断 べき 関数 が . g。 か ら 呈 」 まで 12 





Im 

























































































図 12.2 4 階 (3 次 ) の B ス プラ イン . 上 か ら ? 番目 が 77() で ある . ル 他 7(>) は か ら 


8- 


: 




















まで の ? 点 に お ける 切断 べき 関数 を 使っ て で きる 差分 商 で あり , ル 写 7(z) は か ら 
+4 の 5 点 を 使う 基底 関数 で ある . 
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図 12.3 重複 節点 の ある 4 階 (3 次 ) の B スプライン. 節点 の z 座 標 は 0, 1, 1, 2, 3, 3, 3, 4, 
5, 5, 5, 5 で ある . 一 番 上 は 3 次 の 切断 べき 関数 で あり , 一 番 下 が 基 底 関数 7 か 7(z) で ある . 

















個 あ ちる が , ァ = ニ 1 で 2 重 , ァ ヶ = ニ 3 で 3 重 ,*=5 で 4 重 と な っ て いる . 最も 下 の グ ラフ 
に は 8 個 の 基底 関数 が ある . 単 節 点 の &。 か ら 始 まる 関数 は , 節点 0, 1, 1, 2, 3 を 使っ 
て いる か ら , 1 で 2 次 導 関 数 は 不 連続 で ある . それ 以外 の 節点 で は 2 次 導 関 数 まで 連続 
で ある . 2 重 節 点 の g」 か ら 始 まる 2 個 の 関数 の うち , 左側 の 関数 は 節点 が 1, 1, 2, 3, 3 
で あり , 1.3 で 2 次 導 関 数 は 不 連続 で ある . 右側 の 関数 は 節点 が 1, 2, 3. 3. 3 で ある か 
ら , 3 で は 1 次 導 関 数 も 不 連続 で ある. 左 か ら 4.5 番 目 の 関 数 も 3 で は 1 次 導 関 数 が 不 
連続 で ある . 8 番目 の 関数 の 節点 は 4, 5, 5, 5,、 5 で ある か ら , 5 が 4 重 節点 で あり , 関 
数 値 $ 不 連続 に な っ て いる . この よう に , 節点 を 重複 する こと に よっ て , いろ いろ な 
不 連続 性 を も つ 基 底 関 数 を 作る こと が で きる . 

この よう に , zz 階 ( ヵ ,ー 1 次 ) の B スプ ライ ン は , ヵ m 階 の 切断 べき 関数 を 元 に 作る 
こと も 可能 で あり , 関数 の 連続 性 は 切断 べき 関数 の 性 質 を 受け 継ぎ , 重複 節点 で な け 
れ ば , 妨 ー2 次 導 関 数 まで 連続 で も る . この 方 法 で 作ら れる B ス プラ イン は , 以前 の 
ド ュ ブ ア ・ コ ックス の アル ゴリ ズム に よる B ス プラ イン と 同じ も の で ある が , B スプ 
ライ ン の 性 格 が よく わか る の で , ここ で の 解説 で 取り 上 げた . これ まで に 使っ た 規格 
化 さ きれ た B ス プラ イン と は 式 (3.29) の 関係 










































































Ma7(Z) ニー (ちち も -s)M9T も 2Z) (12.10) 
が ある . 
リー ゼン フェ ルト の 作図 








リー ゼン フェ ルト の 方 法 に よる スプ ライ ン 関 数 を 使う と , 2 次元 曲 線 を 作成 する こ 
と が で きる . 2 次 元 開 曲線 と 2 次 元 閉 曲 線 で は . デー タ 点 の と り 方 が 異な る の で , そ 
れ ぞ れ を 別々 に 取り 扱う こと に する . 
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12.3.1 2 次 元 開 曲 線 














これ まで B ス プラ イン を 使っ て 補間 , 平 消化 な ど に つい て 述べ た が , ここ で は 平面 
2 次 元 曲線 の 生成 に 使う リー ゼン フェ ルト の 方 法 に つい て 述べ る . = げ (z) の 関係 が 
ある デー タ の 補間 ある い は 平滑 化 の 場合 に は , B スプ ライ ン を 基底 関数 と し た 線形 結 
合 で スプ ライ ン 関 数 






















































































8900 gi( の 9 12.11) 
j ニ 1 








を 定義 し , 補間 の 場合 に は , この スプ ライ ン 関 数 が デー タ 点 (z,, 久 ) の 上 を 通る と い 
う 条 件 を 使っ て 係数 c, を 決定 し た . 平滑 化 の 場合 に は , B スプ ライ ン の 数 より 多い 
デー タ 点 を 使っ て , 最小 二乗 法 に より 係数 c, を 決定 し た . また , (z,? ヵ ) 平面 上 の 曲線 
の 場合 に は , 媒介 変数 : を 使っ て ゥ ヶ ー ァ (の), = ッッ () の よう に 二 つ の 関数 と し . それ ぞ 
れ に 式 (12.11) を 適用 し て 


















































(12.12) 


と し た . そし て , この 式 に デー タ 点 の 値 を 代入 し て 連立 方 程 式 を 作り , 係数 @ と の @ 
を 決定 し て , 座標 値 (z(), ?( り ) を 求め た . そこ で , 補間 の 場合 に は 曲線 は デー タ 点 
の 上 を 通る こと に な っ て いる . 

一 方 . リ ー ゼ ン フ ェ ル ト の 方 法 で は , スプ ライ ン 関 数 を 















































(12.13) 





の よう に だ 定義 し て , 座標 値 (z(), y()) を 求め る . 』 は デー タ 点 で あり , (z(⑰, 9(⑰) 
は デー タ 値 で ある . この 方 法 に よる と , 曲線 は 一 般 的 に デー タ 点 の 上 を 通ら ず , 前 衝 
の デー タ の ある 平均 値 の よう な 値 を と る こと に な る . そこ で , デー タ 点 の 上 を 通る よ 
うに し た い 場 合 に は , その デー タ 点 自体 を 重複 させ る こと に な る . 

式 (12.13) の 和 の 項 の 中 で ゼロ で な い Wi (の) は, と の 値 の 周囲 ヵ ヵ 点 (7。 は 階数 ) の 

な に 対応 する 関数 W。 ,() だ け で ある か ら , 1 点 の デー タ 値 に 変化 が 生じ て も , その 
影響 は 周り の 数 点 に 及ぶ だ け で あり , 極め て 局所 化し て いる . そこ で , 図形 の 作成 に 
適し て お り , CAD な ど に 使わ れ て いる . 
図 12.4 は .。 リー ゼン フェ ルト の 方 法 に よる 2 次 元 開 曲線 の 例 で ある . 図形 の 基本 
デー タ の 数 ヵ は 8 点 (o 印 ) で あり , 表 12.1 に 与え られ て いる . 補間 法 の 場合 と 同様 に , 
ニレ 十 72 が 満た され な けれ ば な ら な い . ヶ は 内 部 節点 の 個数 . 妨 は B ス プラ イン の 
階数 で ある . ここ で は , 3 次 の スプ ライ ン を 使う か ら 妨 ニー4 で あり , ルー4 と な る . 






































































































































210 





第 12 章 スプ ライ ン 関 数 と 作 


12.4 B ス プラ イン に よる 2 次 元 開 曲 線 図 形 の 作成 . o 印 が デー タ 点 で あり , 実線 が 作図 











開 曲線 で ある . 




















妊 


































































































表 12.1 リー ゼン フェ ルト の 方 法 に よる 2 次 元 開 曲線 図形 の デー タ 点 . 8 組 あ り , 図 12.4 の 
上 で は っ o 印 で 示さ れ て いる . 











で も , 媒介 変数 を # と し て , 座標 で の 節点 を 作る . それ は , 両端 の 付加 節点 を 


& 三 0.0, 0.0, 0.0, 0.0, 1.0, 2.0, 3.0, 4.0, 5.0, 5.0. 5.0, 5.0 (12.14) 


の 12 点 で ある . 


プロ グラ ム (Bspl_Open.java) の メソ ッ ド (bspl_Open) と ,。 その 説明 は 以下 の と お り 


で ある . 


Bspl_Open.java の メソ ッ ド (bsplLOpen) : 


1 public void bsp1_Upen(doub1e[] xd,double[] 7d, 
ウ doub1e[] xp, double[] yp) { 
3 1nt nd= xd.1ength: 

4 1nt np= xp.1ength: 

5 double twW, dt も, X, ず : 

6 et6 中 。 引 。 相本 和則 5EoLS 

7 nt ndp4= nd+4: 

8 nt ndm4= nd-4: 

9 in て t ndm3= nd-3: 

10 nt ndm2= nd-2: 

| double [] t= nev doub1e [ndm2] : 
12 double [] xi= new doub1e [ndp4] : 
118 doub1e[] N= ne doub1e[4] : 

14 

15 Bsp1 bs= new Bsp1() : 


ーー 
① 





災 
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for (1i=0: 1<4: ュ ++) て 


+ 


xi[1i]= 0.0: 


for (i=0: i<ndm4: 1++) 


+ 


メ ュ 1 [1+4] = ュ +1: 


for (1i=0: 1<4: ュ ++) て 


+ 


x1 [nd+1] = ndm3: 


for (i=0: i<ndm2: 1++) 


+ 


も [1] ミュ: 


dt= (t [ndm3] - も [0] )/ (np-1) : 
for (i=0: 1<np: 1++) 


tw=t [0] +dt* ュ : 
ibsp1= bs.bsp1(tw, x1, N): 
メ =0 . 0: 
y=0.0: 
for (]j=0: ]<4: j++) { 
ュ r]=1bsD1+]-4: 
x=x+xd [1r]] *N[]] : 
7=y+yd [Lirj] *N[] : 





























































































































+ 
xp [1] =x: 
yP li] =y: 

# 

return : 

1. L1, 2 て 46: メソ ッ ド bspl_Open の 定義 で ある . 引数 の xd, yd は 開 曲線 を 求め る 
際 に 基本 と する デー タ 点 の z, ヶ 座標 の 配列 で ある . xp, yp は 戻さ れる 開 曲線 の 
座標 の 配列 で あり , 適当 な 大 き さ の 配列 と し て お く 必 要 が ある . 

2. L3, 4: nd は デー タ 点 の 個数 , np は 求め る 曲線 の 配列 の 大 き さ で ある . 

3. L7: 3 次 の B ス プラ イン を 使う の で , 節点 の 数 は デー タ 点 より 4 点 多く する 必要 
が ある . 

4. L11: t は 媒介 変数 で あり , デー タ 点 の 数 より 2 点 少な い 配列 で ある . 

5. L12: xi は 節点 の 配列 で ある . 

6. L13:N は B ス プラ イン 関数 値 の 配列 で ある . 

7. L15: Bspl の イン スタ ンス を 作る . 

8. L17 て 25: 節点 の 最初 の 4 点 の 値 を ゼロ と し , その 後 は 1 ずつ 増やし た 値 と し て , 
最後 の 4 点 は 同じ 値 と する . そこ で , 曲線 は 両端 の 点 に は 接線 と し て 入る よう に 
な る . 

9. L27 へ 29: 媒介 変数 に ゼロ か ら 整 数 を 順に 代入 する . 

10. L31: 解 と な る 変数 xp, yp と 媒介 変数 の 刻み を 合わ せる . 
11. L32 て 44: xp, yp の 点 の 数 だ け ル ー プ を まわ す . 
12. L33: 媒介 変数 の 値 を 計算 する . 
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13. L34: B ス プラ イン の 計算 結果 を 配列 N に 求め .、 デー タ 配 列 で の B ス プラ イン 
の 位置 を ibspl に 代入 する . 





14. L35 て 43: 式 (12.13) で xy の スプ ライ ン 関 数 値 を 求め 、 配列 xp。yp に 代入 
する . 


15. L44: xp, yp の ルー プ を 終え る . 


この よう に , 実際 に は これ まで に 使っ た B ス プラ イン の クラ ス を 使っ て いる が , ど 
の よう な か らく り で 作図 

















の 数 値 が 決定 され る か を 調べ る た め に , 少し 異な っ た 見 方 を 
する . ここ で , 式 (12.13) に 代わ る 式 を > に つい て 書 








書き な お す と 
7 (た = ニ 0 の と き ) 
旨 / 12.15 
の 1 の エ (1ー OzH(O  (&>0 の と き ) 2 
で ある . こと で , 
『 一 ュー (12.16) 
ち +1ー を 一 ユー カ 


で ある . に つい て も 同様 で ある . 

















いま , #ー2.25 と し て 具体 的 な 計算 を する . 表 121 よ り zP(2.25) =z』 7=2 て 5) 
で あり , 既 知 で ある . 以下 , 順に た =1 は 





z 由 (2.25) = xx 




















2.25) (1 一)z 上 (2.25) = 0.875 
995 一笑 
= = 0.75 
| 
z 軸 (2.55) = AzM(2.25) + (1 - )z 上 (2.25) = 1.417 
(12.17) 
95 el 
= = 0.41 
ュー ー0.417 
sl(2.55) = >z 四 (2.25) + (1 - )z 間 (2.25) = 2.042 | 
95 こう 
ュー ニー デー0.083 
を = 2 は 
s 四 (2.55) = >z 由 (2.25) + (1 - 2)z(2.25) = 1.214 
人 95 
ー = 0.62 
ュー ビー =0.625 
(12.18) 
較 _ _Y 四 還 
yp (2.25) = Azg (2.25) 十 (1 一 )z4 (2.25) = 1.495 
2.25 一 2 
ー = 0.12 
> ュー ラー =0.155 
を 3 は 
z 由 (2.25) = Az 四 (2.25) (1 一)z 叶 (2.25) = 1.284 
(12.19) 
25 こ 
= = 0.2 
ョ ーッ 025 


図 12.5 
式 (12.19) で 計算 きれ る 点 で あり , 実線 が 作図 開 曲 


と な り , z(2.25) = 1.284 が 決定 され る . これ ら の 式 で 計算 され る 点 は 図 


12.3 


リー ゼン フェ ル 





の 作図 
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12.5 に o 印 


で 示さ れ て いる . それ ぞ れ が, 1 階 前 の 2 点 を 結ぶ 線上 の 内 分 点 で あり , 式 (12.17) と 
式 (12.18) の 2 点 を 結ぶ 3 本 の 線 が 破線 で 示さ れ て いる . 


12.3.2 重複 デー タ 点 


リー ゼン フェ ルト の 方 法 に よる スプ ライ ン H 
デー タ を 複数 並べ る 重複 デー タ 点 を 使う こと に な る . 

















を 示す 図 で ある . 























番 下 の | 














線 の デー タ 点 に は 
が り 角 の デー タ 点 か あら ずれ て いる . 下 か ら 2 番 
2 重 と し て あり , 下 か ら 3 番 目 





























は 3 重 と し て ある . 


邊 線 の 作成 で , 特 


衣 複 は な く , 作 
は , すべ て の | 





図 12.6 は 








図 


異 点 を 作る に は 同じ 
重複 デー タ 点 の 効果 
線 は 滑ら ちか で , 曲 
































が り 角 の デー タ 点 は 











いる . 


図 12.6 B ス プラ イン に よる 2 次 
デー タ 点 を 結ぶ 直線 , 実線 は 
か ら 2 番 
2 の 


ど ー ト Sc 愉 mo の -Jaoo つ 


リー ゼン フェ ルト の 方 法 に よる スプ ライ ン 

















線上 の 点 の 算法 . 





























線 で ある . 




















較 








形 上 の 自 











E 図 


















































は すべ て の 曲がり 
(Z12_.06_Bspl_Riesenfeld_Mult 

















線 で ある 
の デー タ 点 は 2 























0 | 2 3456 78910II2I3x 





番 下 の 

















o 印 は 式 (12.17) て 
因 12.4 の 上 部 が 拡大 され て 


『 異 点 の 作成 . o 印 は デー タ 点 で あり , 点線 は 
線 の デー タ 点 に は 








ほ 復 は な く , 下 


ほ と し て あり , 下 か ら 3 番目 は 3 重 と し て あ 
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12.3.3 2 次 元 閉 曲 線 























2 次 元 閉 曲 線 の 場合 は , 配列 の 最初 の 要素 と 最後 の 要素 に 同じ デー タ を 与え て お く 
必要 が ある . 図 12.7 は ⑦ 型 の 作図 で ある . 閉 曲 線 で ある か ら , どこ か ら 始 め て も 同じ 
で ある が , ここ で は , (1.25, 0.35) の sg 印 か ら 始 め ら れ て いる . = ニ 0 で の 上 下 二 つの 
舌 点 は , 3 重 デ ー タ 点 を 与え て 作ら れ て いる 
表 12.2 は ① 型 開 曲 線 図形 の デー タ 点 で ある . 

プロ グラ ム (Bspl_Closed.java) の メソ ッ ド (bspl_Closed) と 。 そ の 説明 は 以下 の と お 
り で ある . 



















































































Bspl_Closed.java の メソ ッ ド (bsplLClosed) : 


1 public void bsp1_C1osed(doubl1e [] xd, double[] 7yd, 
doub1e[] xp, double[] yp) { 

nt nd= xd.1ength: 

1nt np= xD.1ength : 

double twW, dt も, X, すず : 

665 中 。 。 相本 和則 5 


の Q ひ 忠 O 〇 いい 












































図 12.77 B ス プラ イン に よる 2 次元 ① 型 曲線 図形 の 作成 . oc 印 が デー タ 点 で あり , 実線 が 作 
図 曲線 で ある . デー タ 点 は gw 印 か ら 始ま り , 左 回 り に まわ っ て , 再び , 始点 と 同じ 点 で 閉じ 
て いる . 




































































表 12.2 ⑦ 型 曲線 図形 の デー タ 点 . デー タ 点 は (1.25, 0.35) の g 印 か ら 始 まり , 左 回 り に ま 


わっ て , (0.0, 0.55) の 3 重点 を 通り , 左 半 分 を 下り て (0.0, --1.60) の 3 重点 を 通り , 再び , 
始点 と 同じ (1.25, 0.35) 点 で 閉じ る . 



















































































1.25 1.18 1.00 0.60 0.20 0.00 0.00 0.00 
0.35 0.80 1.10 1.20 1.00 0.55 0.55 0.55 


0.20 0.60 1.00 1.18 1.25 1.10 0.60 0.20 
1.00 1.20 1.10 0.80 0.35 | 一 0.20 | 一 0.80 | 一 1.30 


PJ 0.00 0.00 0.00 0.20 0.60 1.10 1.25 
1.60 1.60 1.60 1.30 0.80 0.20 0.35 


で 








は 1 


で 
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1nt ndp6= nd+6: 


doub1e [] t= ne doub1e [nd] : // 媒介 変数 
doub1e [] xi= new double [ndp6] : // 媒介 変数 用 節点 
doub1e[] N= new doub1e[4] : // B ス プラ イン 


Bsp1 bs= new Bsp1() : 


for (i=0: 1<ndp6: i++) て 


+ 


seit | 所 808 


for (i=0: 1<nd: 1++) て 


+ 


i 上 i 思 8 


dt= (t[nd-1] -t [0] ) / (np-1) : 
for (i=0: 1<np: 1++) 


+ 


tw=t [ 0] +dt* ュ : 
ibsp1= bs.bsp1(tw, x1, N): 
メ =0 . 0: 
y=0.0: 
for (]j=0: ]<4: j++) { 
ュ r]=1bsD1+]-4: 
if (ir] > nd-1) ir]= 1r]-nd+1: 
x=x+xd [1r]] *N[]] : 
y=y+yd [irj] *N[]] : 
+ 
xp [1] =x: 
yp Hi]=yj 


re て tuTn : 


9 9 


o さ の の は 











L1, 2 て 36: メソ ッ ド bspl_Closed の 定義 で ある . 引数 の xd, yd は 閉 曲 線 を 求め 
る 際 に 基本 と する デー タ 点 の z, ヵ 座標 の 配列 で ある . xp, yp は 戻さ れる 閉 曲 線 
の 座標 の 配列 で あり , 適当 な 大 き さ の 配列 と し て お く 必 要 が ある . 

L3, 4: nd は デー タ 点 の 個数 .、 np は 曲線 の 配列 の 大 き さ で ある . 

L7: 3 次 の B ス プラ イン を 使う の で , 節点 の 数 は デー タ 点 より 6 点 多く する 必要 
が ある . 

L8: t は 媒介 変数 で あり , デー タ 点 と 数 が 同じ 配列 で ある 

L9: xi は 節点 の 配列 で ある . 

L10: B ス プラ イン 関数 値 の 配 列 で ある . 

L12: Bspl の イン スタ ンス を 作る . 

L14 て 16: 節点 の 値 を 指定 する が , 4 番目 の 要素 の 値 が ゼロ に な る よう に 3 ずら 
し た 値 と する . 

L17 て 19: 媒介 変数 に ゼロ か ら 整 数 を 順に 代入 する . 

L20: 解 と な る 変数 xp、 yp と 媒介 変数 の 刻み を 合わ せる . 

L21 て 34: xp, yp の 点 の 数 だ け ル ー プ を まわ す . 

L22: 媒介 変数 の 値 を 指定 する . 

L23:B ス プラ イン の 計算 結果 を 配列 N に 求め 、 データ 配列 で の B ス プラ イン 
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演 壮 問題 











妊 








の 位置 を ibspl に 代入 する . 

14. L26 て 33: 式 (12.13) で xy の スプ ライ ン 関 数 値 を 求め , 配列 xp。 yp に 代入 
する . 

15. L28: 使用 する デー タ の 添字 番号 が 最大 値 を 超え た ら , (nd-1) を 引い て , ゼロ 
か ら の 番号 に 戻し て いる . 

16. L34: xp、 yp の ルー プ を 終え る . 


























12.1 






































新幹線 の 先頭 車両 を 真横 か ら 見 た 図 を 描き な さい . 
解答 例 : ソー スプ ログ ラム Q12._01.Z12_07_bspl_shinkansen.java 























付録 








Fortran ユー ザ を Java に ご 招待 





Fortran 1 な どの 手続 き 型 言語 に 対し Java な ど は オブ ジェ クト 指向 言語 <: とい われ 
る . Fortran な どの 手続 き 型 言語 を 難 知 し て いれ ば し て いる ほど , Java な どの オブ 
ジェ クト 指向 言語 は 理解 し に くい も の で ある . 逆 に , プロ グラ ミン グ 言 語 を 学ん だ こ 
と の な い 若 い 人 は , 抵抗 な く 理 解 で きる よう で ある . も ちろ ん , Java で も 数 値 計算 を 
する 手続 き の 部 分 は , 手続 き 型 言語 の も の と 同じ で ある が , 両者 は まっ た く 別 も の で 
ある と し て , 頭 を 切り 換え て 学 玉 ほう が よい で あろ う . 特に , Fortran の 副 プ ログ ラ 
ム に 相当 する 部 分 は , Java で は クラ ス と し て 作ら れ て お り , それ を オプ ブ ジェクト! と 
し て 実体 を 取り 込ん で 使う と いう 点 が 最大 な 相違 で ある と いえ よう . 

そもそも , 電子 計算 機 は 計算 を 手助け する 道具 と し て 生ま れ , 複雑 な 計算 の 手続 き 
が 指示 され て , それ を 行う の で ある か ら , プロ グラ ム は いわ ゆめ る 手続 き 理 と な る の が 
当然 の 成り 行き で ある . 最初 は 機械 語 か ら 始 まり , 人 の 労力 と ミス を 少な くす る た め 
こ 「 せ め て 数 式 だ け で も その まま 書き , それ を 計算 機 に 機械 語 に 衝 記 させ よう 」 と い 
う 発 想 か ら Fortran な ど が 開発 され 進歩 し て きた の で ある . その 進歩 の 過程 で も , 常 
に その 時 代 の 計算 機 の 計算 速度 . メモ リ 容 量 な どの 処理 能力 の 向上 に 応じ て , 人 の 労 
力 を 計算 機 に 移し て いく と いう 方 向 で , 言語 仕様 が 発展 し て き て いる . また , 計算 処 
理 効率 を 上 げ る 努力 は 現在 で も 真剣 に 続け られ て いる . 

一 方 . オブジェ クト 指向 言語 の 仕様 は , 電子 計算 機 は 情報 処理 の 万 能 な 機器 と し て 
すでに 存在 し て お り , 「 初 め に 万 能 な 情報 処理 機器 あり き 」 と いう 発想 か ら 考 えら れ 
た と 極論 する こと も 可能 で あろ う . そこ で , 処理 効率 より 使い 勝手 に 重点 が 置か れ て 
お り , 重い 数 値 計算 に は まっ た く 適 し て いな いか ら 、 Java と Fortran を 使い 分 ける 必 
要 は ある . 
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1 FORTRAN は Formula translation ( 式 の 翻訳 ) か ら 作ら れ た 名 称 で あり , 1957 年 に IBM 社 に よっ て 開発 され た . 

2. Smalltalk と いう 言語 が オブ ジェ クト 指向 言語 の 最初 で ある と いわ れ , 計算 機 の 処理 能力 が か な り 向 上 し た 1970 年 
代 に , ゼロ ックス 社 に よっ て 開発 され た . 

3. Java で は オブ ジェ クト と いう 代わ り に イン スタ ンス と いう こと も あり , 両者 は 同義 語 で ある . 本 書 で は , 主 に イン 
スタ ンス を 使う . 
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人 AA.1 Eortran と Java の 実行 





A.1.1 Fortran プロ グラ ム の 実行 





Fortran プロ グラ ム の 作成 か ら 実行 まで は , 標準 的 に は 以下 の と お り で ある . 

















1. ソー スプ ログ ラム (コード ) を テキ スト 形式 で 書く . ファ イル の 拡張 子 は for, 
f fOO な ど で あ る . プロ グラ ム の 中 で , 必要 に 記 じ て 量 





一 プロ グラ ム の 呼び 出 
し の 文 を 書く . 文字 コー ド に 依存 する が , マシ ン 依 存 で は な い . 

2. ソー スプ ログ ラム を コン パイ ラ に か け , オブ ジェ クト ファ イル (モジ ュー ル ) 
を 作る . コマ ンド は 機種 や ソフ トウ ェ ア に 依存 し , fort, fd, f77, f90 な どい 
ろ い ろ あ る . 出力 ファ イル の 拡張 子 は obj,。o な ど で あ る . マシ ン 依 存 で あ 
り 異 な っ た 機種 で は 使え な い . 

3. オブ ジェ クト ファ イル を リン カ に か け , 実行 形式 ファ イル (ロー ドモ ジュ ー 
ル ) を 作る . この 際 。 オブ ジェ クト モジ ュー ル に , 必要 な シス テム ライ ブラ 
リ や ユー ザラ イブ ラリ の 副 プ ログ ラム な ど が 結合 され る . ある 副 プ ログ ラム 
が ソー スプ ログ ラム の 中 で 複数 回 呼び 出さ れ て いて も , リン ク さ れる も の は 
1 個 で ある . コン パイ ルコ マン ド で , リン ク ま で 行わ れる も の も ある が , jink 
コマ ンド を 使う も の も ある . 出力 ファ イル の 拡張 子 は out, exe ある い は 拡 

張子 な し で ある . マシ ン 依 存 で あり 異な っ た 機種 で は 使え な い . 

4. 実行 は ロー ドモ ジュ ー ル の ファ イル 名 を コマ ンド 名 と し て 打ち 込む こと で 


生 交 










































































最近 は , ソー スプ ログ ラム の 編集 画面 で 。 コン パイ ル か ら 実 行 ま で を GUI で で きる 
ソフ トウ ェ ア も あり , それ な り に 便利 で ある 


























A.1.2 Java プロ グラ ム の 実行 





Java プロ グラ ム の 作成 か ら 実 行 ま で は , 標準 的 に は 以下 の と お り で ある . 


1. ソー スコ ー ド を テキ スト 形式 で 書く . ファ イル の 拡張 子 は java で ある . プロ 
グラ ム の 中 で , 必要 な ら 他 の クラ ス を 継承 し た り , 他 の クラ ス の イン スタ ン 
ス (オブ ジェ クト の こと ) を 作成 する 文 を 書く . ソー スコ ー ド 自体 は 文字 コー 
ド に 依存 する が , マシ ン 依 存 で は な い . 

2. ソー スコ ー ド を コン パイ ラ に か け , 出力 クラ ス フ ァ イル を 作る . コマ ンド は 
javac で あり , 

















> javac ソー ス フ ァ イル 名 .java 


と 打ち 込む . ソー スコ ー ド は , マシ ン に も ゃ 文字 コー ド に も 依存 し な い バ イト 
コー ド と いわ れる 中 間 言 語 に 翻訳 され る . 出力 ファ イル の 拡張 子 は class で 
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ある . 
3. 実行 の コマ ンド は java で あり , 





> java クラ ス フ ァ イル 名 (拡張 子 .class は 付け な い ) 








で 行う . 実行 は java コマ ンド に 相当 する も の が 用 意 さ きれ て いる 機械 な ら , ど 
の よう な 機械 で も よく , 計算 機 の ウェ ブ ブ ラ ウザ や , 携帯 電話 , 家電 機器 な 
ど で も 実行 で きる よう に する こと が 可能 で あり , 実行 は バー チャ ル マ シ ン で 
行わ れる と いう . 計算 機 上 で 実行 され る 際 に は , 当該 クラ ス に , 必要 な シス 
テム の ライ ブラ リ や ユー ザラ イブ ラリ の クラ ス が 取り 込ま れる . 同じ クラ ス 
の イン スタ ンス が ソー スプ ログ ラム の 中 で 異な っ た 名 称 で 複数 個 作 られ て い 
た ら (呼ば れ て いる の で は な い ) , 同じ 機能 を も つ イ ンス タン ス が 複数 個 存在 

















する こと に な る . も ちろ ん , ある イン スタ ンス の 中 の メソ 


























ッ ド ( 副 プ ログ ラ 


ム に 相当 ) が 複数 回 呼ば れる 場合 に は , 同一 の メソ ッ ド が 使わ れる . 異な る 

















名 称 (a, b) で 作ら れ た 2 個 の イン スタ ンス の メソ ッ ド m() 


や フィ ー ル ド ( 変 


数 ) x は , am(),a.x と bm() , bx の よう に イン スタ ンス 名 を 使っ て 区 別 き 
れ て お り , “.? は Fortran の 構造 体 で の % の 使い 方 に 少し 似 て いる . 
































最近 は , ソー スコ ー ド の 編集 画面 で 。 コン パイ ル と 実行 まで を GU 
ウェ ア も あり , それ な り に 便利 で ある . 

まず 手始め に , Java の 入出 力 だ け の プロ グラ ム を 書い て みよ う . 
に 説明 が ある か ら , と りあ え ず , わか ら な いこ と を 気 に し な いで 読 


























1I で で きる ソフ ト 











H 語 の 多く は 後 
み 進 め て ほし い . 








こ m 





Fortran の write 文 で 文字 列 を 出力 する だ け の プロ グラ ム は , write 文 と end 文 の 2 行 
で よい が , Java で は , まず クラ ス で 囲み . その 中 に メソ ッ ド を 入れ 子 に し , その 中 に 

















print 文 を 書く か ら , 最低 5 行 が 必要 と な る . 


入出 力 








A.2.1 出力 


出力 は メソ ッ ド System.out.println () で 行わ れる . System クラ ス ( 


ょ ディ フォ ー ル ト 


で イン ポー ト さ れ て いる か ら , イン ポー ト 文 な し で 使え る . 引数 は 文字 列 で あり , 文 
字 列 , 文字 その他 の 基本 デー タ 型 を 連結 演算 子 (+) で 連結 し た も の で ある . 基本 














デー タ 型 の 式 は 全体 を 括弧 () で 括り , 連結 する 前 に それ ぞ れ を 11 





固 の 値 と し て お く 














必要 が ある . 出力 の 最後 で 改行 を し な い 場 合 は .、 メソッド System.out.print () を 使う . 


エス ケー プシ ー ク エン ス は 〇 C 言語 と 同様 で ある . 
出力 の プロ グラ ム (Print.java) と その 説明 は 以下 の と お り で ある . 
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Print.java : 


1 pub1ic cl1ass Print { 
2 public static void main(String[] args) { 
名 System.out .print("print は 改行 な し で , 『) 





改行 を 行っ て いる . System ク 


4 System.out .print]n("println は 改行 あり . "): 
局 まま 
6 +} 
1. L1 て 6: クラ ス Print の 定義 で ある . 
2. L2 て 5: メソ ッ ド main の 定義 で ある . 
3. L3: 改行 な し の プリ ント メソ ッ ド で ある 
4. L4: 改行 あり の プリ ント メソ ッ ド で ある . 最後 に 
ラス は ディ フォ ー ル ト で イン ポー ト さ れ て いる か ら , イン ポー ト 文 は いら な い . 
A.2.2 人 入力 





入力 は あま りら 簡単 で は な い . 1 バイ ト 入 力 す る だ け な ら inread () メソ ッ ド を 使い , 
数 値 の よう な 文字 列 を 入力 する に は in.readLine () メソ ッ ド を 使う . 入力 に エラ ー が 
あっ た と き の 処 理 (例外 処理 ) の た め に , class の 宣言 文 で , throws IOExxception を 指定 
し な けれ ば な ら な い . その た め に は java.iow を イン ポー ト し て お か な けれ ば な ら な 
い . in.readLine() メソ ッ ド で は , 文字 列 が 入力 され る だ け で ある が , StringTokenizer 




















ト 











クラ ス を 使っ て , 文字 列 を 区 切 記 号 ご と に 分 害し て , 必要 な 型 変換 を 行え ば 数 値 の 入 


力も 可能 で ある . それ に は java.util* を イン ポー ト し て お か ね ば な ら な い . 
1 文字 を 入力 する プロ グラ ム (Read.java) と その 説明 は 以下 の と お り で ある . 


Read.java : 


1 import ]ava.10 .*: 
2 pub1ic class Read { 


3 pub1ic static void main(String[] args) throws IOException { 


char c= (char)System .in .read() : 


+ 


oo の の 


+ 


























L2 て 8: クラ ス Read の 定義 で ある 
L3< て 7: メソッド main の 定義 で ある . 例外 処 下 
L4: 改行 あり の プリ ント メソ ッ ド で 文字 列 の 出 





St 選 の 也 提 





System.out .print]n(" 入 力 し た 文字 は "+c+" で す . の : 


System.out .print1n("1 文字 と Enter を 入力 し て 下さ い . ゆ : 


L1: 入出 力 の 例外 処理 用 の IOException の た め に java.io* を イン ポー ト す る . 

















ほ E を 投げ る 











H 意 を する . 





力 を する . 


L5: 文字 型 変数 c の 宣言 を 行い 入力 メソ ッ ド で 1 バイ ト 入 力 し , 文字 型 に 変換 


する キャ スト 演算 子 (char) を 使っ て 文字 型 に 変換 し た 値 を c に 代入 し て いる . 
6. LG: 改行 あり の プリ ント メソ ッ ド で 連結 され た 文字 列 の 出力 を する . 





数 値 を 入力 する プロ グラ ム (ReadLine.java) と その 説明 は 以下 の と お り で ある . 
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ReadLine.java ・ 
1 import ]ava .10o.*: 
2 import ]ava .ut ュ 1 .*: 
3 pub1ic class ReadLine { 
4 public static void main(String[] args) throws TOException {て 


記 double a, Db, CC: 

6 BufferedReader in 

(4 = nev BufferedReader(new TnputStreamReader(System .1n) ) : 
8 System.out .print1n( "数 値 2 個 と Enter を 入力 し て 下さ い . ゆ ): 

9 String s= in.readLine() : 

10 StringTokenizer t = new StringTokenizer(8) : 

11 a = Double .parseDoubl1e(t.nextToken() ) : 

1 b = Doub1e.parseDoub1e(t .nextToken() ) : 

員 S C ニ 8a キ b: 


14 System.out .print1n(" 入 力 し た 数 値 の 積 は "+c+! で す . 『): 


1. L2: L10 に ある 文字 列 を 区 切 記号 ご と に 分 割 す る クラ ス StringTokenizer の た め 
の イン ポー ト 文 で ある . 

L3 て 16: クラ ス ReadLine の 定義 で ある 

L4 て 15: メソ ッ ド main の 定義 で ある . 例外 処理 を 投げ る 用 意 を する . 

L6, 7: BufferReader クラ ス の イン スタ ンス を 作る . 

L8: 改行 あり の プリ ント メソ ッ ド で 文字 列 の 出力 を する . 

L9: String s の 宣言 を 行い 入力 メソ ッ ド で 1 行 入力 す る . s は 入力 し た 1 行 を 
参照 し て いる . 

7. L10: StringTokenizer クラ ス の イン スタ ンス を , s を 対象 と し て 作成 する . 

8. L11, 12: 最初 の 区 切 記号 まで の 文字 列 を double 型 に 変換 し て a に 代入 し , 次 の 
区 切 記号 ま で の 文字 列 を qouble 型 に 変換 し て b に 代入 する . 

9. L13:a*b を c に 代入 する . 

10. L14: c の 値 な ど を 出力 する . 
































の の た の い 














A.2.3 ファ イル か ら の 入力 





ファ イル か ら の 入出 力 は 文字 情報 ば か り で な く , 画像 情報 . 音声 情報 な ど を 同一 の 
方 法 で 扱え る よう に な っ て いる た め , も っ と 複雑 で ある . また , ここ で 扱う ファ イル 
入力 は (出力 も ) , html 文書 で ウェ ブ に 載せ る こと が , セキ ュ リ ティ 上 の 問題 で 不可 能 
に され て いる . 

ファ イル を 入力 する プロ グラ ム (ReadFile.java) の メソ ッ ド (readFile) と その 説明 は 
以下 の と お り で ある . 









































| 





ReadEile.java の メソ ッ ド (readEile) : 


1 pupblic int readFi1e(doub1e[] a, String fi1e, String de] ) 
必 throws IOException { 

3 Fi1eReader fr = new Fi]eReader(fi]e) : 

4 BufferedReader br = nev BufferedReader(f ェ ) : 
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( 〇 OO の の 





StringToken1zer 8: 


String 8t エ : 


int n= 0: 
whi]e( (str=br .readLine( ) ) ! =nu11) { 


St = nevw StringTokenizer(str , de1 ) : 
whi]e (st.hasMoreTokens()) { 
a [n++] = Doub1e.parseDoub1e(st .nextToken() ) : 













































































が 
+ 
return n: 
# 

1. L1 て 15: メソ ッ ド readFile の 定義 で ある . 引数 の a は 入力 し た デー タ を 代入 す 
る 配列 で , 要素 数 は デー タ 数 より 多く し て お か ね ば な ら な い . file は 読み 込む 
ファ イル 名 , del は デー タ の 区 切 記号 の 指定 で ある . デー タ の 区 切 記 号 の ディ 
フォ ー ル ト は , “ wtYn\r\f” 空白 、 タブ, 改行 , 復帰 改行 , お よび 用 紙 送 り で 
ある . 

2. L2: 入出 力 時 の エラ ー( 例 外 と いう ) 処理 の た め に 必要 で あり , java.io.* を イン 
ポー ト し て お く 必 要 が ある . L3, 4 の EileReader, BufferedReader も 同様 で ある . 
L3: ファ イル 名 を 引数 に し て FileReader クラ ス の イン スタ ンス を 作る . 

L4: FileReader の イン スタ ンス を 引数 に し て BufferedReader クラ ス の イン スタ 
ンス を 作る . 
5. L5: デー タ 文 字 列 を 切り 出す StringTokenizer クラ ス の イン スタ ンス 用 の 名 前 を 
定義 むす る . この クラ ス は java.util* を イン ポー ト し て お くく 必要 が ある . 
L6: 1 行 の 文字 列 を 入力 する String を 定義 する . 
L7: 入力 する デー タ 数 を 数 える int 型 変数 n を 宣言 し , 初期 値 0 を 代入 する . 
L8 て 13: ファ イル か ら 1 行 読み 込み str に 代入 する . ファ イル の 最後 に 来 て いる 
場合 に は , 何 も 読み 込め な い の で , str の 値 は null と な る か ら , null に な る まで 
ルー プ す る . 
9. L9: 入力 し た 文字 列 と , 区 切 記号 を 引数 と し て , StringTokenizer クラ ス の イン 
スタ ンス を 作る . 

10. L10 て 12: デー タ が ある 間 は ルー プ す る . 

11. L11: 次 の デー タ 文 字 列 を 切り 出し , double 型 数 値 に 変換 し 配列 。 に 代入 する . 
代入 が 終わ っ た ら , n の 値 を イン クリ メン ト す る 

12. L14: デー タ 数 n を 返す . 


A.3 





A.3 Fortran か ら 


Fortran か ら 見 た Java の 主 な 相違 点 
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計算 の 手続 き の 書き 方 は C 言語 と ほぼ 同じ で あり , Fortran に は な い 記 述 方 法 も 多 








い . 以下 , 列 的 で は ある が , 主 な 相違 点 を あげ て みる . 














使用 され る 文字 と 特殊 文字 (記号 ) 
更 用 され る 文字 な ど は 表 A.1 の と お り で ある . Fortran 




















で は 英字 の 大 文字 と 小文字 


は 区 別 さ れ な い が , Java で は 別物 と し て 扱わ れる . 同じ スペ ル で も , クラ ス 名 の 先頭 


は 大 文字 に し , メソッド 名 の 先頭 は 小文字 に し て 区 別 を 明 





キー ワー ド (予約 語 ) 

Fortran に は 予約 語 が な い の で , 例え ば 真 偽 値 を 表す の 
を 使っ て , 
Java で は true false は 真 偽 値 の 予約 語 と な っ て お り , 名 前 
予約 語 (java で は キー ワー ド と いわ れる ) は 全部 で 約 50 個 



































リテラ ル (定数 表現 ) 





確 に し て いる 人 も いる . 





に .true. .false. の よう に “7 


名 前 と し て 定義 きれ る か も し れ な い true false と 区 別 する 必要 が ある が , 





と し て 使う こと は で き な い . 
弱 あ る ( 表 A.2 を 参照 ) . 























Fortran90 の 組み 込み デー タ 型 に 対応 し , 数 字 や 文字 を 使っ て その まま 表現 する デ 


夕 ( 例 : 1.0. “abc") で ある . 








表 A.1 Java で 使わ れる 文字 . 
大 小 甘 学 | 4-2 sa-z 
数 字 0-9 
特殊 文字 | - 8 + - * / % ., 5 
紀和 う (も) M け l 
表 A.2 Java の 予約 語 . 
abstract boolean break byte 
catch char class const 
default do double else 
fnal fnally Hoat for 
正 implements import instanceof 
interface long native neW 
private protected public return 
Static strictfp SuDer switch 
this throw throws transient 
void volatile while 











CaSe 
continue 
extends 

goto 

int 

package 
short 
synchronized 


try 
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ロ 整数 の 標準 は 4 バイト の int 型 で やり, ほか に 2 バイ ト の short 型 。1 バ イト 
の byte 型 と 8 バイ ト の long 型 が あり , 約 10 桁 以下 な ら int 型 と な り , 10 て 
19 桁 で 数 字 の 最後 に 上 また は 1 を 付け る と long 型 と な る . その ほか , 先頭 
に 0 を 付け る と 8 進数 . Ox を 付け る と 16 進数 と な る . 

ロ 実数 型 は 浮動 小数 点数 と いわ れ , 標準 は 倍 精度 の double 型 ( 例 : 1.0) で あり , 

単 精度 は Hoat 型 ( 例 :1.0f) で 数 字 の 最後 に f を 付け て double 型 と 区 別 する . 

ロ 論理 型 は ブー ル (boolean) 型 と いわ れ , 値 は true と false の 2 個 で ある . 

ロ 文字 は , 文字 1 個 を 単 一 引用 符 “”" で 括っ た 文字 (char) 型 ( 例 : )a り ) と , 0 個 
以上 の 文字 を 二 重 引用 符 “"” で 括っ た 文字 列 (String) 型 ( 例 : "abc") と が 別 
物 と し て 存在 する . 

ロ Java に は 複素 数 型 は な い . 
























































呈 ! 
































皿 3 
































基本 デー タ 下 ナ 

基本 デー タ 型 は . リテラ ル に ある 型 か ら String を 除い た 種類 だ けが ある . 基本 デー 
タ 型 の 変数 の 宣言 の 仕方 は , Eortran と ほぼ 同様 で ある . String は 文字 列 を 値 と し て 
も つば か り で な く , 文字 の 長 さ を 返す メソ ッ ド (]ength () ) な ど 47 個 の メソ ッ ド と 9 個 
の コン スト ラク タ を も ち , 基本 デー タ 型 で は な く ク ラス で ある ( 表 A.3 を 参照 ) . 
































Java で は , 基本 デー タ 型 以外 は 参照 型 と た いわれ, イン スタ ンス 名 を 宣言 し , 同時 に 
イン スタ ンス を 作っ て 参照 4 を 代入 する か , 他 の イン スタ ンス の 参照 を 代入 し て か ら で 
な いと 使え な い . 

すでに String は 参照 弄 で ある と 述べ た が , 配列 も 参照 弄 で ある . 配列 の 要素 は 基本 
デー タ 型 ば か り で な く ク ラス で ある こと も あり , その 場合 に は その クラ ス 型 の 配列 と 
な る . 2 次 元 配列 は , 第 1 添字 の 配列 の 各 要 素 と し て , 長 さ が まち まち な 第 2 添字 の 
配列 を 作る こと が で きる . そこ で , 記述 の 仕方 も それ な り の 特徴 が あり , Eortran で 
の a1, 2, 3) は Java で は al と な る . 添字 の 値 は , Fortran で は 配列 の 宣言 次 






































表 A.3 Java の 基本 デー タ 型 . 











整数 byte, short, int, long 
浮動 小数 点数 | Hoat. double 

ブー ル (論理 ) | boolean 

文字 char 











人 4. 





基本 デー タ 型 の 場合 は , 変数 に 値 が 代入 され る が , 参照 型 の 場合 は , 変数 に 代入 され る も の は 使わ れる イン スタ ン 


ス の 入 








(参照 点 ) で ある . 


























A.3 Fortran か ら 見 た Java の 主 な 相違 点 225 





第 で ある が , Java の 場合 は ゼロ か ら 始 まり C 言語 と 同じ で ある . 


例 1: Class_1 c1: Class_2 c2 = new Class_2 () : 
前 者 は Class-1 と いう 名 前 の クラ ス が すでに 定義 され て いる と き に , その 
クラ ス 型 の イン スタ ンス の 参照 を 代入 する こと の で きる 変数 名 c1 を 宣言 
し , 後者 は 宣言 の 後に 右辺 で Class_2 型 の イン スタ ンス を 新しく 作り , そ 
の イン スタ ンス の 参照 を c2 に 代入 する . 右辺 の メソ ッ ド ? Class_2() は コ 
ンス トラ クタ と いわ れ , Class_2 型 の イン スタ ンス を 作る と き に 使わ れる . 

例 2: String s = ニ “abc": String s = ニ new String (“abe” ) : 

両者 は 同じ こと で , 文字 列 ク ラス の イン スタ ンス を 参照 で きる 変数 名 s を 
宣言 し , 文字 列 イ ンス タン ス “abe" の 参照 を 代入 する . 右辺 が リテラ ル の 
場合 は new 演算 子 は 付け な い . この 場合 メソ ッ ド s.length () は 3 を 返す . 

例 3: double[ ] a= {1, 2, 3}: double| | a= ニ new double[3]: 

前 者 は double 型 配列 の イン スタ ンス の 参照 が で きる 変数 名 a を 宣言 し , 
double 型 配列 の イン スタ ンス 1 人 1, 2, 3} の 参照 を 代入 する . 右辺 が リテラ ル 
の 配列 定数 な の で new 演算 子 は 付け な い . 後者 は 変数 名 a の 宣言 の 後に , 
要素 数 が 3 の double 型 配列 の イン スタ ンス の 参照 を 代入 し て いる が , まだ 
値 は 定まっ て いな い . 

例 4 : doublel ][ ] a= ニ new double[ 外 回: double| ][ ] a= 人 {11 {2, 3), {4, 5, 6} け : 
前 者 は , 第 1 添字 の 要素 数 が 2 で , 第 2 添字 の 要素 数 3 の 長方形 の 2 次 元 
配列 の 宣言 と . それ が 参照 する イン スタ ンス の 作成 を する . 後者 は , 第 1 
添字 の 要素 数 が 3 で , 第 2 添字 の 要素 数 が 1. 2. 3 で まち まち で ある 配列 を 
作成 する . 後者 の 第 1 添字 の 要素 数 の 3 は a.length で 取得 する こと が で き , 
第 1 添字 が 1 の 要素 の 第 2 添字 の 要素 数 の 2 は al.length で 取得 する こと 
が で きる . 









































呈 





























クラ ス 

プロ グラ ム 単 位 は クラ ス で ある . クラ ス に は メン バ が あり , メン バ の 種類 は フィ ー 
ルド 6。 メソッド 7 と 内 部 クラ ス で ある . プロ グラ ム の 実行 が 始ま る main メソ ッ ド を 
含む クラ ス の ソー ス フ ァ イル 名 は , クラ ス 名 .java で な けれ ば な ら ず , 外 ( こ の 場合 は 
OS) か ら 呼 べ る よう に , public 属性 8 を 指定 し て お く . main メソ ッ ド に は , public と 




















・ メソ ッ ド は 引数 が な い 場 合 で も () を も つ 


フィ ー ル ド は 変数 名 配列 名 。 イン スタ ンス 名 な ど で あ り , 値 , ある い は イン スタ ンス の 参照 が 代入 され る . 


・ メソ ッ ド は subroutine や function と 同じ く 作 業 を する プロ グラ ム 単 位 で ある . 








・ Eortran の 参照 許可 指定 子 は , public と private の 2 個 で あっ た が , Java の アク セス 修飾 子 は public、 指定 な し , 
protected, private の 4 種類 が あり , 使う 対象 に よっ て 意味 合い が 異な る の で 注意 が 必要 で ある . 例 : public class 
test {…} を ソー ス フ ァ イル test.java に 書き , コマ ンド > javac test.java で コン パイ ル し て , > java test で 実行 
する . test は 名 称 で ある か ら , も ちろ ん 他 の 名 称 で も よい . 
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static 属性 9 を 指定 し て お く . 

main メソ ッ ド を 含ま な い ク ラス は , main メソ ッ ド を 含む クラ ス と 同じ ファ イル に 
書く こと も で きる . この 場合 に は . コン パイ ル さ れる と , 各 ク ラス が ば ら ば ら に され , 
各 ク ラス の 名 称 を も つ ク ラス ファ イル と な り , 現 デ ィ レ クト リ に 出力 され る . 別 の 
ファ イル に 書い て ある 場合 に は , 前 も っ て コン パイ ル を 行い 、 ク ラス ファ イル と し て 
お いて も よい し , ファ イル 名 が クラ ス 名 と 同じ で あれ ば . クラ ス フ ァ イル に な っ て い 
な く て も , 自動 的 に ファ イル が 探し 出さ れ て , コン パイ ル さ れる の で , それ で も よい . 
現 デ ィ レ クト リ に 置い て ある クラ ス に 対し て は , イン ポー ト 文 は 必要 な い . 

一 つの クラ ス 内 に , 型 と 名 称 が 同じ で も , 引数 が 異な る メソ ッ ド を , 複数 定義 する 
こと が で きる . Fortran に は entry 文 が ある が , あま り 使い や すい も の で は な か っ た . 
他 の クラ ス の 使い 方 は 2 通り で ある . 


















































口 クラ ス の 継承 一 一 新しく 書く プロ グラ ム が , すでに 存在 する プロ グラ ム に 追 
加 ・ 修 正 を すれ ば よい 場合 に は , ソー スプ ログ ラム の 先頭 で 、 その クラ ス の 
継承 を 定義 し . それ に 追加 ・ 修 正 を する こと に な る . 継承 され る 元 の クラ ス 
は 親 ク ラス ある い は スー パー クラ ス と いわ れ , 継承 する 新しい クラ ス は 子 ク 
ラス ある い は サブ クラ ス と いわ れる . 子 ク ラス の 中 で 親 ク ラス に ある フィ ー 
ルド 名 ( 例 : name) を 再 定義 する と , 新しい 定義 が 使わ れる . 親 ク ラス の も の 
を 使い た いと き に は supername の よう に 予約 語 の super を 前 に 付け て 区 別 
する . 子 ク ラス の 中 で 新しい メソ ッ ド を 作る 際 に , 親 ク ラス に その 型 と 名 称 
が 同じ メソ ッ ド が あり , 引数 も 同じ で ある と , その メソ ッ ド は 再 定義 され る 
こと に な り , 引数 が 異な れ ば 新た な メソ ッ ド が 追加 され る こと に な る . 前 者 
は , メソ ッ ド の オー バー ライ ド と いわ れ , 後者 は オー バー ロー ド と いわ れる . 
引数 が 異な れ ば , 型 と 名 称 が 同じ メソ ッ ド を 多数 同時 に 定義 し て お く こ と が 
で きる が , 名 称 が 同じ で 型 が 異な る メソ ッ ド は 両立 で き な い . オー バー ライ 
ド さ れ た 親 クラ ス の メソ ッ ド ( 例 : name() ) を 使い た いと き は , や は り 予 約 
語 の super を メソ ッ ド 名 の 前 に 付け , super.name () と し て 区 別 す る . 

ロ クラ ス の イン スタ ンス 化 一 ーー ク ラス の も う 一 つの 使い 方 は クラ ス の イン ス 
タン ス (実体 ) を 作っ て , その 中 の フィ ー ル ド (変数 ) や メソ ッ ド を 使う 方 法 
で ある . イン スタ ンス の 作成 は new 演算 子 と クラ ス の コン スト ラク タ サ を 









































9. public static void main (String[ ] args) {…} を クラ ス test の 中 に 書く . static キー ワー ド も 属性 を 指定 する も の で 
あり , 類似 な も の に nal が ある . void は メソ ッ ド に 戻り 値 が な いと き に 指定 し , O 言語 と 同じ で ある . 

10・ 継承 に は extends キー ワー ド を 使う . extend は 動詞 で あり , 文章 で ある か ら 3 人 称 単数 現在 の と き に 付け る s が 付 
いて いる . implements, throws も 同様 で ある . 例え ば , child と いう 名 前 の クラ ス が parent と いう 名 前 の クラ ス を 
継承 する 場合 に は , class child extends parent {…} と 書く . 

1 コン スト ラク タ は クラ ス の 中 で 定義 され て お り , 呼ば れる と その クラ ス の イン スタ ンス を 作る メソ ッ ド で ある . 名 
前 は クラ ス 名 と 同じ で , public 属性 の み も っ て いる . 引数 が 空白 な 場合 は |, イン スタ ンス の 作成 時 に 他 の こと は し 
な い が , 引数 に 指定 が あれ ば , それ に 応じ て イン スタ ンス の 内 部 の 初期 処理 を 行う . 引数 が 空白 な コン スト ラク タ 
は , 明示 的 に 書か れ て いな く て も よい . 
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使っ て 行わ れる ( 例 : Some_Class s = new Some_Class () : ) . Some_Class と 
いう 名 前 の クラ ス の イン スタ ンス が 作ら れ , それ を 参照 する 値 が 変数 名 s 
に 代入 され る . この イン スタ ンス に ある フィ ー ル ド 名 ( 例 : name) を 使う に 
は sname と し , それ が メソ ッ ド 名 な ら ば sname () と する . また , new Some 
-Class () が 実 引数 に 使わ れれ ば , 仮 引数 側 で この イン スタ ンス を 使う こと に 
な る . この イン スタ ンス の メン バ を 使う に は , 実 引 数 の 名 称 . メ ン バ 名 と 
する . 











メソ ッ ド の 引数 
Fortran と は か な り 異 な る の で 注意 が 必要 で ある . 














ロ 基本 デー タ 型 一 一 値 が 渡さ れる の で , メソ ッ ド 内 部 で の 変化 は 呼び 出し 元 に 
伝わら な い . 
ロ クラ スーー イ ンス タン ス の 参照 が 渡さ れる の で , メソ ッ ド 内 部 で の 変化 が 呼 
び 出 し 元 に 伝わる . 
ロ クラ ス の メン バ を 引数 に 指定 する こと は で き な い . 
演算 子 な ど 


言語 と ほとん ど 同 じ で ある が , よく 出 て くる 特徴 的 な も の を 拾う こと に する . 








べき 乗 演算 子 (axxb) は な く , メソ ッ ド Math.pow (a, b) を 使う . 
関係 演算 子 の /= は !ー で ある . 
































ロ 
ロ 
ロ 
ロ 
ロ 





論理 演算 子 の not. は !, .and. は &&k, .or. は | で ある . 

文字 列 の 連結 演算 子 の // は + で ある 7". 

Java に は イン クリ メン ト 二 上 と ディ クリ メン ト -- 演算 子 が ある . a+ 二 は 
a に 1 を 加え , ョ ーー は a か ら 1 を 引く . 

Java の 代入 演算 子 は = だ け で な く , 二 , 一 =, * 三 , /= な ど が あり , x 二 テッ 
は x ニ x 二 y, xx 一 ニャ y 二 2 は x ニ xー(y 十 2) 等 で ある . 

三 項 条件 演算 子 (て ) ? て : て は , (て ) が 真 な ら ? 以下 の 値 と な り , 偽 な ら 
: 以下 の 値 と な る ( 例 :y=(a>b) ? a : b : で は y に 大 きい ほう の 値 が 代入 さ 
れる ) . 

キャ スト 演算 子 ( 型 ) は 変数 や 値 を も つ メ ソ ッ ド な どの 前 に 置い て , キャ スト 
演算 子 に 指定 し た 型 に その 値 を 変換 する ( 例 : double d = 1.0 : Hoat f = (Hoat) 
申 3)、 

















財 


結 され る 項 




















は 文字 と 文字 列 だ け で は な く , 基本 デー タ 型 の 値 も 文字 に 変換 され て 連結 され る . 
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制御 文 
ロ 


ロ 
ロ 
ロ 





コメ ント 





do 文 の do 1, n へ end do は , for 文 の for G=1: i<=n: i 十 ) て) で ある . 
do while 文 の do while (て ) て end do は , while 文 の while (て ) {て}) で ある 
Java に は dowhile 文 do {て へ} while (て ) が ある . 

select case (て) case (て ) て case (て ) て case default へ end select は , switch 
(て ) {ease て : て case て : で default: て }) で ある . 

制御 文 の return 文 は 同じ で あり , cycle 文 は continue 文 , exit 文 は break 文 
で ある . 

(て ) then て else if( て ) then て else へ て end 潤 は , 王 ( て ){ て ) else 議 (て ) 
{で} else {て へ) で ある . 








Java は 保守 が し や すい よう に 設計 され て いる か ら , その 機能 が 十分 生き る よう に , 
コメ ント も きち ん と 書い て お く こ と が 肝要 で ある . 


ロ 











// で 始ま る コメ ント は , // 以降 , 行末 まで が コメ ント と な る . Fortran の ! 
と 同じ で ある . デバ ッ グ 用 に 書か れ て お り , 普段 は 不要 な 出力 文 System.out. 
println () : な ど を コメ ント に する 場合 に も 使わ れる . 

/*#*/ で 括 ら れ て いる コメ ント は , 複数 行 に わた っ て 記述 する こと が で きる . 
デバ ッ グ 用 に 使っ た 不要 な 文 を まとめ て コメ ント に する 場合 に も 使わ れる . 
/*\*/ を 使っ て 書か れ て いる コメ ント 文 は , それ を も と に javadoc コマ ン 
ド を 使っ て 仕様 書 な ど を html 文書 と し て 出力 する た め に も 使わ れる . 文書 
の レイ アウ ト に は htlm 文書 の タグ を 使う ( 例 : <br> (改行 ) 、<sup></sup> 
(上 付 文字 ) , <sub></sub> ( 下 付 文字 ) ) . 


















































A.4 Mrath クラ ス の 主 な メソ ッ ド 








数 学 関係 の メソ ッ ド を まとめ た クラ ス で あり , ディ フォ ー ル ト で イン ポー ト さ れ て 
いる . また , すべ て が static メソ ッ ド な の で , イン スタ ンス を 作ら ず に 直接 Math. メ 
ソ ッ ド 名 () : で 使う こと が で きる . Fortran の 組み 込み 関数 nint。 Hoor, ceiling の 値 は 
整数 で ある が , Java の rint, Hoor, ceil の 戻り 値 は double で ある . Eortran の 組み 込 
み 手 続き call random_number (d) は 実数 d か , 配列 d に 擬似 乱数 [0, 1) が 戻さ れる . 
Java の random は 乱数 が 戻り 値 と し て 返さ れる . Java に は 円 周 率 テー Math.PI と オイ 
ラー 数 e= ニ Math.E が ある ( 表 A.4 を 参照 ) . 
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表 A.4 Fortran の 組み 込み 関数 と Java の Math クラ ス の メソ ッ ド と の 対応 . 



































































































































Fortran 関数 名 戻り 値 の 型 メソ ッ ド 名 意 味 
abs double abs (d) d の 絶対 値 を 返す 
abs Hoat abs (⑪) f の 絶対 値 を 返す 
abs int abs G) i の 絶対 値 を 返す 
abs long abs (1) 1 の 絶対 値 を 返す 
sqrt double sqrt (d) d の 平方 根 を 返す 
Sim double sin (d) d の サイ ン 値 を 返す 
coOS double cos (d) d の コサイン 値 を 返す 
tan double tan (d) d の タン ジェ ント 値 を 返す 
exD double exp (d) e の d 乗 値 を 返す 
]og double ]og (d) d の 自然 対数 の 値 を 返す 
asin double asin (d) dd の アー クサ イン 値 を 返す 
aCoS double acos (d) dd の アー クコ サイ ン 値 を 返す 
atan double atan (d) d の アー クタ ンジ ェ ン ト 値 を 返す 
atan2 double atan2 (d2, d1) | 座標 (d1, d2) の 偏 角 9 を 返す 
nint double rint (d) d の 4 捨 5 入 値 を 返す 
d1**d2 double pow (d1, d2) d1 の d2 乗 を 返す 
ceiling double ceol (d) 切り 上 げ 数 を 返す 
floor double foor (q) 切り 下げ 数 を 返す 
RS double toDegrees (d) ラジ アン 値 d の 度数 を 返す 
アン と 4 double toRadians (d) | 度数 d の ラジ アン 値 を 返す 
random_number* | double random () [0, 1) の 擬似 乱数 を 返す 




















* random_number は 組み 込み 手続 き で ある . 





アプ リケーション と アプ ブレット 




















Java で 書い た プロ グラ ム の コン ピュ ー タ 上 で の 使い 方 は 2 通り ある . 一 つ 目 は , 
Fortran プロ グラ ム の よう に , コン ピュ ー タ 上 で 実行 する 使い 方 で あり 、 ア プリ ケー 
ショ ン と いわ れる . アプ リケーション の 実行 は ,、 main メソ ッ ド か ら 始 まる . 二 つ 目 
は , アプ レッ ト と いわ れ , ウェ ブ 上 で 配信 する こと が で きる 仕掛 けが 用 意 さ れ て いる . 
その た め に は , Applet クラ ス あ る い は swing パッ ケー ジ を import 文 で 











import java.applet.Applet: 


1import javax.8W1ng.*: 


の よう に イン ポー ト し て お き , Applet クラ ス あ る い は JApplet クラ ス を 継承 し な けれ 
ば な ら な い . アプ レッ ト の 実行 は , init メソ ッ ド か ら 始 まる . 
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本 
プレ 


次 





























ッ ト 用 に 使え る よう な 細工 が され お り , と て も 便利 で ある . 



































書 の た め に 書か れ た プロ グラ ム は , 一 つの プロ グラ ム で アプ リケーション 


用 と ア 


の 例 は , 図 1.1 (p.2) の プロ グラ ム Z01_01_cos.java の 一 部 で ある . この プロ グラ ム 
を 変更 し て 新しい プロ グラ ム を 作る 場合 に は ,. プロ グラ ム 名 Z01.01.cos.java の ファ イ 
ル 名 部 分 Z01.01_cos が 使わ れ て いる と ころ を すべ て 新しい プロ グラ ム 名 、 例 えば new 
_-program.java の new_program に 変更 する の が よい . も ちろ ん , メイ ン メ ソ ッ ド な ど 
が 含ま れ て いる クラ ス の 名 称 だ け を 変更 すれ ば 実行 可能 で ある けれ ども , 他 の プロ グ 
ラム に 含ま れ て いる さま ざま な クラ ス 名 と 区 別して お いた ほう が よい か ら で あ る . 














Z01.01_cos.java の 一 部 


(OO CO の 喉 の OD は 


co oO oO oO OO O oO) O DD h ト ) hN) hbD hD D) DD) DD) D) ほほ ニュ ロニ ロロ ロビ ロビ は ロロ 
oo の の 選 の いい は の OO の 〇 の の いい は の oo ココ の の 忌 の いい は の 


/* 


<APPLET COUDE = "Z01_01_cos.c1ass" WIDTH = 808 HETGHT = 599></APPLET> 


*/ 


1mport mygks.GkS: 
1mport javax.Swing.*:// JApplet, JFrame, JPane] な ど 
import java.awt.*:  // Graphics, Graphicd2D な ど 


pub1ic cl1ass Z01_01_cos extends JApplet て 
// アプ リケーション 用 の main を 定義 し , フレ ー ム を 作る 
pub1ic static void main(String args[] ) て 
Z01_01_cosJFrame fr = new Z01_01_cosJFrame() : 
fr . setTit1e("Z01_01_cos") : 


// フレ ー ム の サイ ズ は , 内 部 コン テ ナ よ り , (8,33) 大 きく と る こと 


fr.setSize(800+8 , 566+33) : 
fr.setDefau1tC1oseUperation(JFrame .EXTT_UN_CLOSE) : 
fr.setVisib]e(true) : 
+ 
// アプ レッ ト 用 の init を 定義 し . パネ ル を 作る 
pub1ic void init() { 
new Z01_01_cosJPane1(this . getContentPane () ) : 
+ 
+ 
// アプ リケーション 用 の フレ ー ム を 定義 し ., パネ ル を 作る 
class Z01_01_cosJFrame extends JFramet 
pub1ic Z01_01_cosJFrame() { 
new Z01_01_cosJPane1(this . getContentPane () ) : 
+ 
+ 
// 基本 と な る パネ ル を 作る . 必須 
class Z01_01_cosJPane1] extends JPane]t 
// 以上 は size 以外 極め て 一 般 的 で ある . 
// 以下 は 例 で ある . 
pub1ic Z01_01_cosJPane1(Container cont){ 
// 図 を 描く パネ ル の 作成 
JPane1] pane] = new JPane1(new BorderLayout()) { 
pub1ic void paint(Graphics g) t 
Super . Daint(g) : 
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Z01_01_cosGraph mg= new Z01_01_cosGraph(g) : 
mg .mydraw() : 
+ 
8 
pane1 .setSize(800,566) : 
// pane1 . setBackground(Co1or .WHTTE) : 


// 図 を 描く パネ ル を コン テ ナ に 追加 する 
cont . add (pane1) : 
+ 
+ 
class Z01_01_cosGraph { 


Gks gk= new Gks(): 
Graphics g: 


pub1ic Z01_01_cosGraph(Graphics g) 
this.g= g: 
+ 


pub1ic void mydraw() て 
gk.setgks(g) : 
// ここ と か ら 上 を コピ ー し , <app1et> で の 名 前 を は じ め , 
// 17 個 す べ て の 名 前 GksTemp1ate を ファ イル と 同じ 名 前 に する 


中 略 図 を 描く ! 
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1. L1 へ 3: コメ ント に な っ て いる か ら , コン パイ ル の 際 は 無視 さき れる. し か し , ア 





プレ ッ ト を 表示 する アプ レッ トビ ュー ア の コマ ンド 


> appletviewer ファ イル 名 .java 


で , アプ レッ トビ ュー ア に 表示 する 際 に は 解釈 され る . アプ レッ トビ ュー ア を 使 





う 前 に .。 この プロ グラ ム を コン パイ ル し て , クラ ス フ ァ イル に し て お か な く て 


は な ら な い . 








2. L5: 自作 の グラ フィ ックス パッ ケー ジ mygks の クラ ス Gks を イン ポー ト す る . 














Gks を 使わ な けれ ば , この 行 は いら な い . 


3. L6.7: グラ フィ ックス と ユー ザイ ンタ フェ ー ス の た め の 各 種 API が 含ま れ て い 








る パッ ケー ジ の swing と awt を イン ポー ト す る . 


4. L9 て 23: swing の クラ ス JApplet を 継承 し て public class の Z01_.01_cos.class を 


作る . 
L11 て 18: アプ リケーション と し て 使う た め の main メソ ッ ド を 作る 








6. L12: 図 を 表示 する た め の フ レー ム ( 賃 ) を 作る イン スタ ンス を クラ ス Z01.01 
_cosJErame (L25 へ て 29) で 作る . この クラ ス は , swing の クラ ス JFrame を 継承 











し で ゆる 。 
7. L13: フレ ー ム の タイ トル と し て Z01.01_cos を 指定 する . 





8. L15: フレ ー ム の サイ ズ を 8O8x599 と 指定 する . Gks で 図 を 描く パネ ル の 大 き 
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10. 


12. 


13. 


14. 


15. 


16. 


17. 


18. 


19. 


20. 


21. 


22. 


23. 
24. 


25. 


26. 





さき を L43 で 800x566 と 指定 する の で , 人 額 の 大 き さ を 考慮 する と , この 数 値 と 
な る . 

L16: 額縁 の 右上 に ある 消去 用 の ボタ ン を クリ ッ ク し た ら , フレ ー ム が 消さ れる 
仕掛 け を 指定 する . 
L17: フレ ー ム に 図 を 表示 する よう に 指定 する . 

L20 て 22: アプ レッ ト と し て 使う た め の init メソ ッ ド を 作る . アプ レッ ト の 場合 
に は , 図 を 表示 する アプ レッ トビ ュー ア や ウェ ブ の ブラ ウザ が フレ ー ム を 作る か 
ら , ここ で は フレ ー ム を 作る 必要 が な い . 

L21: パネ ル を 添付 し て フレ ー ム に 乗せ る コン テ ナ の 取得 を 引数 と し て , JPanel 
の イン スタ ンス を クラ ス Z01._01_cosJPanel 型 で 作っ て いる . 

L25 て 29: アプ リケーション 用 の フレ ー ム を 定義 すむ する クラ ス を , JFrame を 継承 
し て 作る . 
L26 へ 28: クラ ス Z01.01_cosJFrame の コン スト ラク タ で あり , ここ で , L21 と 
同じ こと を 行っ て いる 
































































































































L31 て 48: JPanel を 継承 し て パネ ル を 作り , 図 が 描か れ た ら コ ン テ ナ に 貼り 付け 
る と , それ で 措 画 が 行わ れる . 
L36 て 42: JPanel 型 の イン スタ ンス を 作る . パネ ル に コン ポー ネン ト を 貼り 付け 














る レイ アウ ト を BorderLayout 形式 と し て いる . 

L37 て 41: JPanel の メソ ッ ド paint を オー バー ライ ド し て , Z01.01_cosGraph ク 
ラス の mydraw メソ ッ ド で の 描画 が で きる よう に 変更 し て いる 

L38: まず , 親 ク ラス の メソ ッ ド paint を 実行 し , 描画 の 準備 を する 

L43: 描画 する パネ ル の 大 き さ を 800x566 に 指定 する . 

L44: パネ ル の 背景 色 を 白 に する . 指定 し な いと 灰色 で ある . 

L46: 図 を 描く パネ ル を コン テ ナ に 追加 する 

L50 て 66: L39 で イン スタ ンス を 作っ た クラ ス の 定義 で ある . 

L51: Gks を 使う 場合 に は ,、 その イン スタ ンス を 作る 

L52 で て 56: L37 の メソ ッ ド paint の 実 引 数 と し て 得 ら れる Graphics 型 の イン スタ 
ンス の 参照 g が 、 L39 で コン スト ラク タ の 引数 に 使わ れる か ら , それ は L55 の 
g と し て L52 の g に 与え られ , 以後 使わ れる 

L58 て 65: 図 を 描く メソ ッ ド で あり , Gks を 使う 場合 に は , setgks メソ ッ ド で g 
の 参照 値 を Gks に 渡す . Graphics クラ ス , Graphics2D クラ ス あ る い は Gks ク 
ラス を 使っ て 描画 を する . 

L66: Z01.01.cos クラ ス が 終わ る . 






























































































































































次 は Z01.01 cos クラ ス を アプ レッ ト と し て , ウェ ブ ブ ラ ウザ で 見 る た め の HTML 
文書 で ある . 


CO の 品 心 の DD は 


<!-- 図 1.1 cos(x) の 級数 展開 . Z01_01_cos.java 16/11/04 --> 


< く HTML> 


<HEAD><TTTLE> Z01_01_cos </TITLE></HEAD> 


く BUDY> 


<APPLET CODE="Z01_01_cos.c1ass" WITDTH=800 HETGHT=565></ APPLET> 
く <P>Copyright(c) 2004: Wakoh System Laboratory Co., Ltd. く /P> 
</BODY> 
< く /HTML> 
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1. L1: タグ <!ーー か ら ーー> まで は コメ ント で ある . 

2. L2 て 8: タグ <HTML> か ら </HTML> まで が HTML 文 で ある . 

3. L3: <HEAD> か ら </HEAD> まで は ヘッ ダ 部 で ,。 タイ トル タグ <TITLE> タ 
イト ル </TTTLE> で タイ トル な ど を 指定 する 

4. L4 て 7: <BODY> か ら </BODY> は HTML 文書 の 本 体 で ある . 

5. L5: <APPLET CODE= ニ “クラ ス 名 ?> </APPLET> は アプ レッ ト タ グ で あり , 
CODE 属性 に アプ レッ ト の クラ ス 名 を 記し , 表示 する 画面 の 大 き さ も 指定 で 
きる . 

6. L6: <P> か ら </P> は パラ グラ フタ グ で あり , それ まで と 異な る パラ グラ フ と 
し て , 文章 を 出力 する . 






































A.6 ライ ブラ リ パ ッ ケー ジ の 作り 方 と 使い 方 








複数 の クラ ス と 0 個 以上 の イン タフ ェ ー ス を グル ー プ 化し て パッ ケー ジ と する . 


1. 





パッ ケー ジ の 作成 一 一 下 の よ うに クラ ス を 定義 むる プロ グラ ム の 先頭 で パッ 
ケー ジ 文 を 指定 する . 


package パッ ケー ジ 名 : 
その プロ グラ ム の ファ イル を 


> javac 一 d ファ イル 名 


で コン パイ ル す る と , パッ ケー ジ 名 で 指定 し た ディ レク トリ の 下 に クラ ス 
ファ イル が で きる . 

パッ ケー ジ の ロー ドー 一 下 の よ うに イン ポー ト 文 で イン ポー ト し た い ク ラス 
名 を プロ グラ ム の 先頭 で 指定 する . 








import パッ ケー ジ 名 . ク ラス 名 : 


import パッ ケー ジ 名 .*: 


* を 指定 する と , パッ ケー ジ 内 の すべ て の クラ ス と イン タフ ェ ー ス が イン 
ポー ト さ れる . 

import 文 で 指定 され た パッ ケー ジ は , まず 現 デ ィ レ クト リ で 探さ れ ,、 な けれ 
ば シス テム に 指定 し て ある ディ レク トリ で 探さ れる . ほか か ら も っ て きた り , 
自分 で 作っ た り し た パッ ケー ジ が , 現 デ ィ レ クト リ 以 外 に あれ ば , 環境 変数 
CLASSPATH に パス を 指定 し て お く 必 要 が ある . コン パイ ル す る ソー ス フ ァ 
イル に 複数 の クラ ス が ある 場合 に は , それ ら の クラ ス は , 現 デ ィ レ クト リ に 
作ら れる か ら , イン ポー ト す る 必要 は な い . 




















java の プロ グラ ム で , 頻繁 に 使わ れる System クラ ス や Math クラ ス な ど は , イン 
ポー ト し な いで 使う こと が で きる . 
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A.7 





付録 A Fortran ユー ザ を Java に ご 招待 





イン タフ ェ ー ス の 使い 方 








Fortran で は 副 プ ログ ラム の 引数 と し て 関数 を 受け 渡し する こと が で きる が , Java 
で は メソ ッ ド を 引数 と し て 受け 渡し する こと は で きず , その メソ ッ ド が 定義 され て 
いる クラ ス の イン スタ ンス の 参照 を 受け 渡し する こと に な る . そこ で , 実 引 数 と な る 
イン スタ ンス の メソ ッ ド 名 と , 仮 引数 の イン スタ ンス の メソ ッ ド 名 を 同じ に し て お 


か ね ば な ら ず , 少し 不便 で ある . し か し , イン タフ ェ ー ス と し て 定義 し た クラ ス の 





























象 メ ソ ッ ド で その メソ ッ ド 名 を 定義 し て お き , その イン タフ ェ ー ス を 実装 する クラ ス 
で , 具体 的 な メソ ッ ド の 中 身 を 定義 する よう に し て お く と , その メソ ッ ド を 使う クラ 


























ス に 汎 ) 

















HH 性 を も た せる こと が で きる . 最初 に 出 て きた 例 は 第 4 章 の クラ ス Nibunhou. 





java の メソ ッ ド nibunhou で ある か ら , その メソ ッ ド を 使う プロ グラ ム NibunhouTest. 
java に 沿っ て 説明 する . 
プロ グラ ム (NibunhouTest.java) と その 説明 は 以下 の と お り で ある . 


NibunhouTest.java ・ 


1 pub1ic cl1ass NibunhouTest t 


2 
3 
4 
5 
6 
7 
8 
回 


10 } 


11 + 


pub1ic static void main(String[] args) { 


Function f = nevw Function(1, 1, -6): // 2 次 関数 を x^2+x-6 と する 
Nibunhou nb= new Nibunhou() : 


doub1e x = nb.nibunhou(0.0, 3.0, f): // [0,3] で 解 を 求め る 
System.out .print]n("f(x) = 0 を 2 分 法 で 求め る . 『): 
System.out.print(" 解 x = リ + x): 

System .out .print1n(" 精度 f(x) = ! + f.function(x) ) : 


1. L1 て 11: クラ ス NibunhouTest の 定義 . 

2. L2 て 10: メイ ン メ ソ ッ ド の 定義 . 

3. L3: 下 で 説明 する 関数 の メソ ッ ド を も ゃ もつ Function クラ ス 型 の イン スタ ンス f を 
作成 する . クラ ス Hunction で の 関数 は 2 次 式 で あり , 2 次 式 の 係数 は コン スト 
ラク タ の 引数 で 与え られ る . 引数 は (1, 1, -6) で ある か ら , 関数 は z2+ ァ ー6 
で ある . 

4. L4: クラ ス Nibunhou 型 の イン スタ ンス nb を 作成 する . 

5. L6: クラ ス Nibunhou の メソ ッ ド mibunhou を 使っ て , 範囲 (0.0, 3.0) で 関数 
の 根 を 探し ,、 x に 代入 する . 

6. L7 て 9: 根 の 出力 を し , 求め られ た 根 の 値 を 使っ て 関数 の 計算 を し て , 精度 の 
安 と し て 出力 する . 












































プロ グラ ム (Function.java) と その 説明 は 以下 の と お り で ある . 
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Function.java ・ 


1 c1ass Function implements MyFunction て 

2 private double a, Db, C: 

3 public Function(doub1e a, doub1e b, double c) { // コン スト ラク タ 
4 this.a = aj 

5 this.b = b: 

6 も this .c 
Ki 
8 
9 


と 
pub1ic double function(doub1e x) { // 関数 
return (a*x 二 b)*x 十 C: 
0  j 


1. L1 て 11: 下 で 説明 する イン タフ ェ ー ス MyEunction を 実装 する クラ ス Function 
の 定義 で ある . 

2. L2: コン スト ラク タ Function (L3 て 7) と メソ ッ ド function (L8 て 10) で 共通 に 

使う フィ ー ル ド (変数 ) ab, c の 宣言 . 
L3^ て 7: オー バー ロー ド す る コン スト ラク タ Function の 定義 . 
L4C6: コン スト ラク タ Function の 引数 ab, c の 値 を , L2 で 宮 言 し た a, b, c 
に 代入 する . キー ワー ド this は この クラ ス を 指す . 

5. L8 て 10: L2 で 宣言 し た a, b, c を 係数 と する , 2 次 式 の 定義 で 。 メソ ッ ド 
function を オー バー ライ ド す る . 

















イン タフ ェ ー ス (MyFunction.java) と その 説明 は 以下 の と お り で ある . 


MyEunction.java ・ 


1 pub1ic interface MyFunction { 
2 public double function(doub1e x) : 
@ Jj 


1. L1^ て 3: イン タフ ェ ー ス MyEunction の 定義 で ある . 

2. L2: 抽象 メソ ッ ド function の 定義 メソ ッ ド の 型 と 引数 x の み が 定 義 き され て お 
り , MyFunction を 実装 する クラ ス の 中 で オー バー ライ ド さ れ , 実体 は その クラ 
ス の 中 で 定義 され る . 



































本 書 の プロ グラ ム で は Java の グラ フィ ックス 機能 を 使っ て 作っ た パッ ケー ジ mygks 
を 使っ て いる . まだ 完熟 し た も の で は な い の で , 版 と し て 一 部 を 提供 する . 表 B.1 
に 基本 的 な 図形 出力 と その 属性 指定 な どの メソ ッ ド を , 表 B.2 に その 属性 を まとめ た . 

プロ グラ ム (Z01_01_cos.java) の クラ ス (Z01.01_cosGraph) に 沿っ て , 簡単 な 解説 を 
行う . 付録 人 A の プロ グラ ム Z01.01_cos.java の 解説 と 併せ て 理解 し て ほし い . 







































































Z01_01_cos.java の クラ ス (Z01_.01_cosGraph) : 


class Z01_01_cosGraph { 
Gks gk= new Gks(): 
Graphics pg: 


pub1ic Z01_01_cosGraph(Graphics g) { 


1 
2 
3 
4 
5 
6 も this.g= E: 


















































表 B.1 mygks の 基本 的 な 図形 出力 と その 属性 を 指定 する メソ ッ ド . i は 表 B.2 の 属性 の 番号 , 
d は 線 幅 と マー カ の 倍率 ある い は 文字 の 大 き さ , x, y は 座標 . xa, ya は 座標 の 配列 、n は 描 
画 に 使う 点 の 数 で ある . また s は 文字 列 で ある . 





















































貞 環 | 種類 大 きき 
線 gDl (n, xa, ya gsln ⑪ gSlwsc (d) gSDlci ⑪ 





計 

















マー カ | gpm (n, xa, ya) gsmk ⑪) gSmksc (d) gSDmci ⑪ 
文字 gtx (x,yY, s) gschh (d) gstxci (i) 
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表 B.2 mygks の 図 








出力 の 色 , 線 種 、 マ ー カ 属性 . 

































































1 0 由 2 8) 4 5 6 7 
色 黒 | 赤 緑 黄 青 紫 空 
線 種 実線 | 点線 | 破線 | 鎖線 | 一 点 鎖線 | 二 点 鎖線 | 三 点 鎖線 
マー カ 十 ネ o x 








7 
8 
9 


// 
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+ 
pub1ic void mydraw() t 

gk.setgks(g) : 

doub]e xscale= 2*Math .PT: : 

doub1e wxmin= -2.0*xscale。 wxmax= 2.0*xscale: // x 世界 座標 範囲 

doub]e xmin= -1.0*xscale, xmax= 1.0*xsca]e: // x グラ フ の 範囲 

doub1e yscale= 1.0: 

doub1e wymin= -4.0*yscale, wymax= 4.0*yscale: // 7 世界 座標 範囲 

String ree= "fr リ : 

gk.gopen(wxmin ,wxmax , Wymin,Vymax, free) : 

doub1e [] [] win= gk.gqwindow(): // ウィ ンド ウ の 定数 の 取得 

doub1e dsx= win[2][0]: // x 量 /cm 

doub1e dsy= win[2][1]: // y 量 /cm 

gk.gs1n(1) : // 線 種 を 実線 に 指定 

gk.gs1wsc(3.0): // 線 の 太 さ を 3 倍 に 指定 

gk.gsp1c (0) : // 線 の 色 を 黒 に 指定 

gk.gsmk(1) : // 点 印 を 指定 

gk.gsmksc(2.0): // マー カサ イズ を 2 倍 指定 

gk.gspmci (0) : // マー カ の 色 を 黒 に 指定 

doub1e h=gk.gqchh() :// 文字 の 高 さ を 取 得 

gk .gschh(1 .5*h) : // 文字 の 高 さ を 1.5 倍 に 指定 

gk.gstxci (0) : // 文字 の 色 を 黒 に 指定 

nt nmaxx= 101: // 配列 要素 数 


doub1e[] x= 
doub1e[] y= 





// 
// 


nev double [nmaxx] : 
ne double [nmaxx] : 


int nkind= 5: 
doub1e [] [] y1= new doub1e [nkind] [nmaxx]:// 近似 関数 用 配列 


x 座標 , 





cos 関数 . 近似 関数 の 配列 デー タ の 作成 


for (int =0O: 1<nmaxx: 1++) 
doub1e w= x[i]= (-1.0+i*2.0/ (nmaxx-1 ) ) *xmax : 
y[i]= Math.cos() : 
y1[0] 1]= 1.0: 


y1[1] 1] ミ 71[0] [1i] - w*w/2: 

y1[2] [1i]= y1[1] [1] + w*W*w*w/24: 

y1[3] [1i] = y1[2] [1] - w*w*w*w*w*w/720 

y1[4] [1] = y1[3] [1] + w*W*W*W*W*W*w*w/40320: 


が 


// 座標 系 の 表示 
// 座標 軸 の 表示 





gk.gVector(xmin*1.3.0.0, xmax*1.3.0.0, 0.3) :// 


x 座標 用 配列 
cos 関数 用 配列 


加 
示 


x 座 
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58 gk .gVector(0.0,wymin, 0.0,wymax, 0.3) : // y\ 硬 計 
59  // x 軸 上 目盛 り 
60 gk.gs1wsc(2.0), // 線 の 太 さ を 2 倍 に 指定 


61 gk.gJoin(xmin,0.0, xmin,dsy*0.3) : // 目盛 り 線 
62 gk.g〕oin(xmin/2,0.0, xmin/2,dsy*0.3): // 目盛 り 線 
63 gk .gJoin(xmax/2,0.0, xmax/2,dsy*0.3): // 目盛 り 線 
64 gk .gJoin(xmax,0.0, xmax,dsy*0.3) : // 目盛 り 線 
65 敵 // 誤 2EH 上 目盛 

66 gk.gtx(xmin-dsx*0.8,-dsy*0.8,"-2 7『): 

67 gk .gtx(xmin/2-dsx*O0.5,-dsy*0.8,"-7"): 

68 gk.gtx(dsx*O0.2,-dsy*O.8, "07): 

69 gk .gtx(xmax/2-dsx*O.4,-dsy*0.8,"77『): 

70 gk.gtx(xmax-dsx*0.5,-dsy*0.8,"2 7"): 

71  // 7 軸 上 目盛 り 

72 g.gjoin(0.0,2.0, 0.25,2.0): // 目盛 り 線 


73 g.gjoin(0.0,-1.0, 0.25,-1.0): // 目盛 り 線 
74 g.gjoin(0.0,-2.0, 0.25,-2.0): // 目盛 り 線 
75  // 7 軸 上 目盛 り 文字 











76 gk.gtx(-dsx*O0.5,2.0-dsy*O0.25 "2") : 

77 gk.gtx(-dsx*1.0,-1.0-dsy*0.25,"-1") : 

78 gk.gtx(-dsx*1 .0,-2.0-dsy*O0.25, リー-2『): 

79 // 関数 の 表示 

80 gk.gp1 (nmaxx,X, ず ): // cos 関数 グラ フ 

81 // 近似 関数 を nkind=5 種類 表示 

82 for (int 1=0O: i<nkind: 1++) 

83 gk .gs1n(i+1) : // 線 種 を 指定 

84 gk .gsp1ci (1+1) : // 緑 の 色 を 指定 

85 gk.gpP1(nmaxx,x,y1[i]): // 近似 関数 グラ フ 

86 了 

87  } 

88 + 
1. L1 へ て 88: Z01.01_cos.java の クラ ス Z01_.01_cosGraph の 定義 で ある . 
2. L2: クラ ス Gks の イン スタ ンス を 作り , その 参照 を gk に 代入 する . 
3. L3: Graphics 型 の イン スタ ンス を 参照 する 変数 g を 宣言 する . 
4. L5^ て 7: コン スト ラク タ で あり , 外部 で イン スタ ンス が 作ら れる と き , 引数 で 


Graphics 型 の イン スタ ンス を 取得 し . その 参照 を L3 の g に 代入 する . 

L9 て 87: 図 を 描く メソ ッ ド mydraw の 定義 で ある . 

L10: Gks を 初期 化す る . setgks は 規格 外 の 追加 機能 で ある . 

L12 て 20: 画面 内 に 描画 する 世界 座標 の 範囲 を 指定 する . 

L20: gopen で 世界 座標 の z 軸 の 範囲 を wxmin か ら wxmax と し , ヶ 軸 の 範囲 を 

wymin か ら wymax と する . 第 5 引数 を “fr” と する と , 縦横 の 単位 は 独立 で あ 

る が , “fx?” と する と 同じ 単位 と な る . gopen は 規格 外 の 追加 機能 で ある . 

9. L22 て 25: ウィ ンド ウ の 定数 を 取得 する . 画面 上 約 1cm 当たり の ピク セル 数 を 
dsx と dsy に 代入 する . 文字 列 や 目盛 り の 位置 の 指定 な ど に 使う . 

10. L27 へ 35: 国際 規格 の GKS の 関数 と 同じ 名 称 と 機能 の メソ ッ ド で ある . 線 , マー 
カ , 文字 の 属性 を 設定 する メソ ッ ド は 表 B.1 の と お り で , 属性 は 表 B.2 の と お 
り で ある . 







































































69 衣 の 



























































































































































11. 


山 


13. 


14. 


15. 


16. 


17. 


付録 B mygks メモ 239 








L57, 58: 以後 双 n で 引数 の 番号 と する . 点 ( 左 1, 孝 2) か ら 点 ( 厚 3, 間 42) まで の べ 
クト ル を 使っ て 座標 軸 を 描く . 旭 5 は ベク トル の 鉄 の 大 き さ を cm で 指定 する . 








線 の 属性 を 使う . 
L61, 64: 点 ( 
線 の 属性 を 使う . 
L66 て 70: 点 (大 1, 


ーー 














規格 外 の 追加 機能 で ある . 
, 載 2) か ら 点 ( 坦 3, 間 4) まで を 線 で 結び , z 軸 上 の 目盛 り を 描く . 


























規格 外 の 追加 機能 で ある . 











孝 2) を 文字 列 の 左下 の 座標 と し て , 女 3 の 文字 列 (z 軸 上 目盛 

















り 文字 ) を 出力 する . 





L72, 74: y 軸 上 の 





目盛 り を 描く 





























L76 へ 78: ? 軸 上 


盛り 文字 を 出力 する . 








L80: 配列 x, y の 各 要 素 の 組み 合わ せ を 座標 点 と し て , nmaxcx 点 を 折れ 線 で 


結ぶ . 








L82- て 86: それ ぞ れ 線 種 , 線 の 色 を 変え て 近似 関数 の グラ フ を 描く . 
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ソー ス ク ラス リス ト 








由 


本 書 で 扱っ て いる プロ グラ ム の ソー スコ ー ド の リス ト で ある . 備考 欄 に class と 書 





由 




















か れ て いる プロ グラ ム に は , 同名 の クラ ス フ ァ イル が パッ ケー ジ mypackage に ある . 
html と 書か れ て いる ファ イル は html 文書 で ある . 





これ ら の Java プロ グラ ム は 





http://java.sun.com /j2se/1.4.2/ja/download.html 


の 開発 環境 で 作ら れ た が , 2004 和 
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http://java.sun.com/j2se/1.5.0/ja/download.html 














が 提供 され いる . 加 


る こと が で きる . 





硬 開発 環境 は . それ ぞ れ の ウェ ブ ペ ー ジ か ら 全 


日 に は , 新しい バー ジョ ン 























償 で ダウ ン ロ ー ド す 


この リス ト に ある ファ イル と , パッ ケー ジ mygks は ウェ ブ ペ ー ジ 


http://www.tdupress.jp/ 


([ メ イン メニ ュー] っ [ダウン ロード ] っ [Java で 学ぶ 数 値 解析 ] ) 














に あり , 本 書 購読 者 は 3 





























k 償 で ダウ ン ロ ー ド する こと が で きる . 



































































































































































































































ファ イル 名 節 ン 項 目 的 席 考 
Bspl.java 3.5.1 項 B スプ ライ ン class 
BsplTest.java 3.5.1 項 B ス プラ イン の テス ト 
Bspl_Closed.java 12.3.3 項 | スプ ライ ン に よる 2 次 元 閉 曲 線 class 
Bspl_OlosedTest.java 12.3.3 項 | スプ ライ ン に よる 2 次 元 閉 曲 線 テ スト 
Bspl_Open.java 12.3.1 項 | スプ ライ ン に よる 2 次 元 閉 曲 線 class 
Bspl_OpenTest.java 12.3.1 項 | スプ ライ ン に よる 2 次 元 閉 曲 線 テ スト 
Bspl_Smooth.java 8.3.2 項 B スプ ライ ン に よる 平滑 化 class 
Bspl_SmoothTest.java 8.3.2 項 B ス プラ イン に よる 平滑 化 テ スト 
Bspline_Interpolation.java 3.5.1 項 B スプ ライ ン を 使っ た 内 挿 class 
Bspline_InterpolationTest.java 3.5.1 項 B スプ ライ ン を 使っ た 内 挿 テ スト 
Eigen_Power.java 9.2.4 項 累乗 法 に よる 固有 値 問題 解 法 class 
Eigen_PowerTest.java 9.2.4 項 累乗 法 に よる 固有 値 問題 解法 テス ト 
Eigen_QR.java 9.2.5 項 QR 法 に よる 固有 値 問題 解 class 
Eigen_QRYTest.java 9.2.5 項 QR 法 に よる 固有 値 問題 解法 テス ト 
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ファ イル 名 節 ン 項 的 備考 

Fast_Fourier_Transform.java 10.3 節 高速 フー リエ 変換 class 
Fast_Fourier_Transform'Test.java 10.3 節 高速 フー リエ 変換 テス ト 
FindZero.java 4.6 節 複数 解 の 解法 汎用 プロ グラ ム class 
FindZeroTest.java 4.6 節 複数 解 の 解法 汎用 プロ グラ ム テ スト 
Fourier_Transform.java 10.2 節 フー リエ 変換 class 
Fourier_Transform'Test.java 10.2 節 フー リエ 変換 テス 
Gauss_Hakidashihou.java 7.1.2 項 掃き 出し 法 に よる 連立 方 程 式 の 解法 class 
Gauss_HakidashihouTest.java 7.1.2 項 掃き 出し 法 に よる 連立 方 程 式 の 解法 テス ト 
Gauss_Hermit.java 5.3.4 項 ガウ ス ・ エ ルミ ー ト の 積分 公式 class 
Gauss_HermitTest.java 5.3.4 項 ガウ ス ・ エ ルミ ー ト の 積分 公式 テス ト 
Gauss_Laguerre.java 5.3.3 項 ガウ ス ・ ラ ゲー ル の 積分 公式 class 
Gauss_LaguerreTest.java 5.3.3 項 ガウ ス ・ ラ ゲー ル の 積分 公式 テス ト 
Gauss_Legendre.java 5.3.1 項 ガウ ス ・ ル ジャ ンド ル の 積分 公式 class 
Gauss_LegendreTest.java 5.3.1 項 ガウ ス ・ ル ジャ ンド ル の 積分 公式 テス ト 
Gauss_Shoukyohou.java 7.1.1 項 消去 法 に よる 連立 方 程 式 の 解法 class 
Gauss_ShoukyohouTest.java 7.1.1 項 消去 法 に よる 連立 方 程 式 の 解法 テス ト 
Gauss_TchebychefF.java 5.3.2 項 ガウ ス ・ チ ェ ビ シェ フ の 積分 公式 class 
Gauss_TchebycheffTest.java 5.3.2 項 ガウ ス ・ チ ェ ビ シェ フ の 積分 公式 テス ト 
Gyaku_2jikansuu.java 4.5 節 逆 2 次 関数 法 に よる 解法 class 
Gyaku_2jikansuuTest.java 4.5 節 逆 2 次 関数 法 に よる 解法 テス ト 
H03_01_1agrange.java 3.1 節 表 3.1 
H03_02_NewtonInt.java 3.1 節 表 3.2 
HO08_01_tchebycheff.java 8.2 節 表 8.1 
Hasamiuchi.java 4.3 節 挟み 撃ち 法 に よる 解法 class 
HasamiuchiTest.java 4.3 節 挟み 撃ち 法 に よる 解法 テス ト 
Hermit.java 3.4 節 エル ミー ト の 補間 法 class 
HermitTest.java 3.4 節 エル ミー ト の 補間 法 テ スト 
Integral_Simpson.java 5.2.2 項 シン プ ソ ン の 積分 公式 class 
Integral_Simpson'Test.java 5.2.2 項 シン プ ソ ン の 積分 公式 テス ト 
Jacobi.java 9.2.3 項 ヤ コ ビ 法 class 
JacobiTest.java 9.2.3 項 ヤ コ ビ 法 テ スト 
Lag.java 3.1 節 ラグ ラン ジュ の 補間 法 class 
LagTest.java 3.1 節 ラグ ラン ジュ の 補間 法 テ スト 
Lagrange.java 3.2 節 ラグ ラン ジュ 補間 の 汎用 プロ グラ ム class 
LagrangeTest.java 3.2 節 ラグ ラン ジュ 補間 の 汎用 プロ グラ ム テ スト 
LU_Bunkai.java 7.1.3 項 LU 分 解 に よる 連立 方 程 式 の 解法 class 
LU_BunkaiTest.java 7.1.3 項 | LU 分 解 に よる 連立 方 程 式 の 解法 テス ト 
LU_Gyouretsushiki.java 7.2.2 項 LU 分 解 に よる 行列 式 の 計算 class 
LU_GyouretsushikiTest.java 7.2.2 項 LU 分 解 に よる 行列 式 の 計算 テス ト 
Maximum.java 2.2 節 最大 値 class 
MaximumTest.java 2.2 節 最大 値 テ スト 

erge.jaVa 2.10 節 マー ジ class 
MergeTest.java 2.10 節 マー ジテ スト 

yFunction.java A.7 節 戻り 値 double の イン タフ ェ ー ス class 
MyFunction1.java 6.4.1 項 | 戻り 値 double| | の イン タフ ェ ー ス class 

yunction2.java 8.2 節 戻り 値 double[ ]| | の イン タフ ェ ー ス class 
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ファ イル 名 節 ン 項 目 的 席 考 
NewtonInt.java 3.3 節 ニュ ー ト ン の 補間 法 class 
NewtonIntTest.java 3.3 節 ニュ ー ト ン の 補間 法 テ スト 
NewtonRaphson.java 4.4.1 項 ニュ ー ト ン ・ ラ フ ソ ン 法 に よる 解法 class 
NewtonRaphson'Test.java 4.4.1 項 ニュ ー ト ン ・ ラ フ ソ ン 法 に よる 解法 テス ト 
Nibunhou.java 4.2 節 2 分 法 に よる 解法 class 
NibunhouTest.java 4.2 節 2 分 法 に よる 解法 テス ト 
NijiHlouteishiki.java 4.1.1 項 2 次 方 程 式 の 解法 class 
NijiHlouteishiki_Answer.java 4.1.1 項 2 次 方 程 式 の 解 の クラ ス class 
NijiHouteishikiTest.java 4.1.1 項 | 2 次 方 程 式 の 解法 テス ト 
Print.java A.2.1 項 | 出力 サン プル プロ グラ ム 
Random_Exp.java 11.2.1 項 | 標準 指数 分 布 乱数 class 
Random _Exp'Test.java 11.2.1 項 | 標準 指数 分 布 乱数 テス ト 
Random _Function.java 11.2.5 項 | 表 読 取り 法 に よる 関数 分 布 乱数 class 
Random _FunctionTest.java 11.2.5 項 | 表 読 取り 法 に よる 関数 分 布 乱数 テス ト 
Random_Lorentzian.java 11.2.2 項 | ロー レン ツ 弄 分布 乱数 class 
Random_Lorentzian'Test.java 11.2.2 項 | ロー レン ツ 弄 分 布 乱数 テス ト 
Random_Normal.java 11.2.3 項 | 正規 分 布 乱数 class 
Random_NormalTest.java 11.2.3 項 | 正規 分 布 乱数 テス ト 
Random_Sphere.java 11.2.4 項 | 球面 一 様 分 布 乱 数 class 
Random_SphereTest.java 11.2.4 項 | 球面 一 様 分 布 乱数 テス ト 
Read.java A.2.2 項 | 1 文字 入力 サン プル プロ グラ ム 
ReadFile.java A.2.2 項 | ファ イル か ら の 数 値 入力 class 
ReadFileTest.java A.2.2 項 | ファ イル か ら の 数 値 入 力 テ スト 
ReadLine.java A.2.2 項 | 数 値 入 力 サ ンプ ルプ ログ ラム 
RungeKutta4.java 6.4.1 項 ルン ゲ ・ ク ッ タ 法 4 次 公式 class 
RungeKutta4Test.java 6.4.1 項 ルン ゲ ・ ク ッ タ 法 4 次 公式 テス ト 
Saishou_Jijou_Hou.java 8.1.1 項 最小 二乗 法 class 
Saishou_Jijou_HHouTest.java 8.1.1 項 最小 二乗 法 テ スト 
SanjiHouteishiki.java 4.1.2 項 3 次 方 程 式 class 
SanjiHouteishikiTest.java 4.1.2 項 3 次 方 程 式 テ スト 
Savitzky_Golay.java 8.3.1 項 サビ ツキ ー・ ゴ ー レ イ 法 に よる 平滑 化 class 
Savitzky_GolayTest.java 8.3.1 項 サビ ツキ ー・ ゴ ー レ イ 法 に よる 平滑 化 テ スト 
Shufe.java 2.1 節 シャ ッ フ ル class 
ShufHleTest.java 2.1 節 シャ ッ フ ル テ ス ト 
Sort_Bubble.java 2.3 節 バブ ルソー class 
Sort_BubbleTest.java 2.3 節 バブ ルソー ト テ スト 
Sort_Comb.java 2.4 節 柳 ソ ー ト class 
Sort_CombTest.java 2.4 節 柏 ソ ー ト テス ト 
Sort_Heap.java 2.9 節 ヒー プ ソ ー class 
Sort_HeapTest.java 2.9 節 ヒー プ ソ ー ト テス ト 
Sort_Insert.java 2.6 節 還 入 ソー ト class 
Sort_Insert'Test.java 2.6 節 征 入 ソー ト テ スト 
Sort_MergeSort.java 2.11 節 マデ ジ ツ ソー class 
Sort_MergeSortTest.java 2.11 節 マー ジ ゾ ザー ト テ スト 
Sort_Quick.java 2.8 節 クイ ッ ク ソ ツー ト class 
Sort_QuickTest.java 2.8 節 クイ ッ ク ソ ー ト テス ト 
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ファ イル 名 節 ン 項 的 備考 
Sort_Select.java 2.5 節 選択 ソー ト class 
Sort_Select'Test.java 2.5 節 選択 ソー ト テ ス 
Sort_Shell.java 2.7 節 ジェ エル ソー ト class 
Sort_ShellTest.java 2.7 節 ジェ エル ソー ト テ スト 
SphericalBessel.java 1.4 節 球 ベ ッ セ ル 関 数 (1 < 20) class 
SphericalBesselTest.java 1.4 節 球 ベ ッ セ ル 関 数 (1 < 20) テス ト 
SphericalBessel_4.java 1.4 節 球 ベ ッ セ ル 関 数 (< 34) class 
SphericalBessel_4Test.java 1.4 節 球 ベ ッ セ ル 関 数 (( < 4) テス ト 
Spline3_IntNP.java 3.5.2 項 3 次 の 非 周期 スプ ライ ン 補 間 class 
Spline3_IntNPTest.java 3.5.2 項 | 3 次 の 非 周期 スプ ライ ン 補 間 テ スト 
Spline3_IntP.java 3.5.2 項 3 次 の 周期 スプ ライ ン 補 間 class 
Spline3_IntPTest.java 3.5.2 項 | 3 次 の 周期 スプ ライ ン 補 間 テ スト 
Tchebycheff.java 8.2 節 チェ ビシ ェ フ 多項式 近似 class 
TchebychefFTest.java 8.2 節 チェ ビシ ェ フ 多項式 近似 テス ト 
Z01_.01_cos.java 1.1 節 選 | 1.1 
Z01_02_kizami.java 1.2 節 凶 | 1.2 
Z01_03_ketaochi.java 1.3 節 凶 1.3 
Z01_.04_bessel.java 1.4 節 久 1.4 
Z01.05.j.rec.java 1.4 分 凶 1.5 
Z01_06_marume.java 1.5 分 久 | 1.6 
Z02_01_shufe.java 2.1 節 選 | 2.1 
Z02_02 maximum.java 2.2 節 凶 | 2.2 
Z02_03_bubble_exp.java 2.3 節 久 | 2.3 
Z02_04_bubble.java 2.3 節 久 | 2.4 
Z02_05nsert_exp.java 2.6 節 凶 | 2.5 
Z02_06_sort_quick_exp.java 2.8 分 包 | 2.6 
Z02_.07_sort_heap_exp.java 2.9 節 選 | 2.7 
Z02_.08_merge.java 2.10 節 鐘 | 2.8 
Z02_09_merge_exp.java 2.10 節 久 | 2.9 
Z02_10_sort_merge_exp.java 2.11 節 居 | 2.10 
Z03_01_1agrange.java 3.1 節 久 | 3.1 
Z03_.02_lagrange.java 3.1 節 凶 3.2 
Z03_.03_lagrange.java 3.2 節 凶 3.3 
Z03_04_NewtonInt.java 3.3 節 図 3.4 
Z03_05_hermit.java 3.4 節 包 | 3.5 
Z03_06_deBoor_Cox_exp.java 3.5.1 帆 鐘 | 3.6 
Z03_.07_Bsphne_Interpolation.java 3.5.1 頂 錠 | 3.7 
Z03_08_Bspliine_Extended.java 3.5.1 頂 凶 3.8 
Z03_09_Bspline_Heart.java 3.5.1 頂 久 | 3.9 
Z03_10_Spliine3_IntNP.java 3.5.2 項 久 3.10 
Z03_11_Spline3_IntP.java 3.5.2 項 選 | 3.11 
Z04_01_nibunhou_exp.java 4.2 節 久 | 4.1 
Z04_02_hasamiuchihou.java 4.3 節 凶 | 4.2 
Z04_03_newton_raphson_exD.java 4.4.1 項 包 4.3 
Z04_.04_hanpuku_exp.java 4.4.2 項 選 | 4.4 
Z04_.05_gyaku_2jikansuu_exp.java 4.5 節 包 4.5 
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ファ イル 名 節 ン 項 的 備考 

Z04_06_FindZero.java 4.6 節 鐘 4.6 
Z05_01_kukei.java 5.1 節 層 | 5.1 
Z05_02_daikei_simp.java 5.2.2 項 鐘 5.2 
Z05_03_daikei_simp.java 5.2.2 項 層 5.3 
Z05_04_gauss_exp.java 5.3.1 貞 層 | 5.4 
Z05_05_gauss10_exp.java 5.3.1 項 層 | 5.5 
Z05_06_gauss_tchebycheff_exp.java 5.3.2 中 鐘 5.6 
Z05_07_gauss_laguerre_exD.java 5.3.3 項 層 | 5.7 
Z05_08_gauss_hermit_exp.java 5.3.4 項 層 5.8 
Z06_01_bibun_shiki_exp.java 6.1 節 層 | 6.1 
Z06_02_runge_kutta_exp.java 6.2.2 項 層 6.2 
Z06_03_orbit_pro.java 6.4.2 項 鐘 6.3 
Z06_04_Rkg_H.java 6.5 節 図 6.4 
Z06_05_Rkg_H_1s2s.java 6.5 節 層 | 6.5 
Z07_01_pyramid.java 7.1.2 項 層 | 7.1 
Z07_02_gyouretsushiki_exp.java 7.2.2 項 層 7.2 
Z08_01_Saishou_Jijou_Hou.java 8.1.1 項 層 8.1 
Z08_02_SJH_2jishiki.java 8.1.3 項 共 | 8.2 
Z08_03_tchebycheff.java 8.2 節 層 | 8.3 
Z08_04_savitzky_golay_2ji.java 8.3.1 頂 鐘 | 8.4 
Z08_05_savitzky_golay.jJava 8.3.1 項 層 8.5 
Z08_06_Bspl_Smooth_2ji.java 8.3.2 項 層 8.6 
Z08_07_Bspl_Smooth.java 8.3.2 項 層 | 8.7 
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Z08_09_EFET_Smooth.java 8.3.3 項 層 8.9 
Z09_01_ZahyouHenkan.java 9.1 節 鐘 9.1 
Z09_02_JacobiDaen.java 9.1 節 層 9.2 
Z09_03_JacobiDaenMen.java 9.2.3 項 層 | 9.3 
Z10_01_fourier_sin.java 10.1 節 図 | 10.1 
Z10_02_fourier_cos.java 10.1 節 鐘 | 10.2 
Z10_03_gauss.java 10.3 節 層 | 10.3 
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Z10_05_polar.java 10.4 節 層 | 10.5 
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Z10_07_fourier_H1s.java 10.4 節 錠 10.7 
Z10_08_conv_Cu.java 10.5.1 項 | 図 10.8 
Z10_09_fourier_Cu.java 10.5.1 項 | 図 10.9 
Z10_10_deconv_Cu.java 10.5.2 項 | 図 10.10 
Z11_.01_monte.java 11.1 節 図 11.1 
Z11_02_exp.java 11.2.1 項 | 図 11.2 
Z11_03_exp_exp.java 11.2.1 項 | 図 11.3 
Z11_04_lorentzian.java 11.2.2 項 | 図 11.4 
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Z11_08_buffon.java 11.3.1 項 | 図 11.8 
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ファ イル 名 節 / 項 的 備考 
Z11_09_MtAsama.java 11.3.2 項 | 図 11.9 
Z11_10_parabola.java 11.3.2 項 | 図 11.10 
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Z12_07_bspl_closed_heart.java 12.3.2 項 | 図 12.7 
Z01_01_cos.html 1.1 節 包 | 1.1 html 
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Q01.01.201_01_cos.java 1.1 
Minimum.java,。 MinimumTest.java 2.1 
Sort_Bubble_d.java, Sort_Bubble_dTest.java 2.2 
Sort_Quick_d.java, Sort_Quick_dTest.java 2.3 
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Q06_-01.206_03_shindou.java 6.1 
Q08_01.208_02_.SJH_2jishiki.java 8.1 
Q10_01.210_03_delta.java 10.1 
Q11.01.Z11_01.janken.java 11.1 
Q11_.02_Z11_01.janken.java 11.2 
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著者 が 最初 に 電子 計算 機 に 触れ た の は , 












































東大 の 


学部 物理 学科 に 進学 し た 1959 年 

















の こと で ある . 当時 , 高橋 ・ 後 藤 研 で 発明 され た パラ メト ロン 素子 を 使っ た 試作 機 
PC-1 (Parametron Computer 1) で の 実習 が , 学生 実験 の 科目 に 組み 込ま れ て いた か ら 
で ある . メモ リ は 512 語 (1 語 = 3 バイ ト に 相当 ) し か な く , テレ ックス 通信 用 に 使わ 








れ て いた , タイ プラ イタ と 紙テープ の 読み 









































取り ・ 打 ち 出 し 装置 を 合わ せ た 機 器 だ けが 





付い て いた . プロ グラ ム は 機械 向き 言語 で 書か れ , 紙テープ に 鎖 孔 ( 火 あ け ) し て 読み 
取り 装置 に か ける と , 前 も っ て メモ リ に 載せ て ある イニ シャ ル ロ ー ダ ー が プロ グラ ム 
を 2 進数 に 変換 し て メモ リ に 載せ , それ が 実行 され る も の で あっ た . イニ シャ ル ロ ー 
ダー は , 現在 の OS の 先祖 で あり , 入力 と 出力 を 処理 する 機能 を も っ て お り , 512 語 の 















































メモ リ の うち 約 450 語 ほ ど を 使っ て いた か ら , 利用 


























者 が 使え る メモ リ は 60 語 程度 し か 








な か っ た . それ で も , 平方 根 や 三角 関数 の 計算 ,」 あるいは 簡単 な E 式 の シン プ ソ ン 積 分 
な ど は 工夫 次 第 で 収め ある こと が で きた の で , 学生 実験 レポ ー ト の テー マ と な っ て いた . 





























1960 年 代 に な る と , 国産 の 電子 計算 機 も 実用 








で あっ た が , 後半 に こ な る と コン パイ ラ 言 語 




















すべ て 自分 で 書か な けれ ば な ら な か っ た . 














の 段階 に 入り , 前 半 は 機械 向き 言語 





の ALGOL や FORTRAN が 使え る よう に 
な っ て きた . この 頃 に な る と , 平方 根 は ハー ド 素 子 で . また 三角 関数 な ど は ソフ ト 
ウェ ア で 提供 され る よう に な っ た が , 少し 複雑 な 関数 や 手続 き な ど の 副 プ ログ ラム は 





この よう な 経緯 か ら . この 本 で 取り 扱う プロ グラ ム の 多く は , 当初 は 機械 向き 言語 , 
ALGOL, FORTRAN 等 いろ いろ な プロ グラ ミン グ 言 語 で 書か れ , また , 書き 直さ れ 





た も の が ほとん ど で あ る . も ちろ ん , Java 


ある . 





受話 
言語 の 














も の は つい 最近 書き 直し た も の で 


周知 の ご と く , TIT 技術 の 発展 は 計算 機 の ハー ドウ ェ ア と ソフ トウ ェ ア に と ど ま ら 
ず , マルチ メデ ィ ア に まで 及び , 多く の 言語 で グラ 
数 値 解析 で は , 一 見 , グ ラフ ィ ッ クス を 使わ な く て も 良さ そう で ある が , デバ ッ グ の 
数 百 か ら 数 千 ス テッ プ に も 及ぶ 数 値 計算 
の プロ グラ ム を 作る と き の デ バッ グ は , まさ に 砂 を 噛む 思い で ある . 特に .、 ある テー 
マ に 関し て , 世の中 で 最初 の プロ グラ ム を 書く と き は 
わけ で ある か ら 。 最 終結 果 が 出る まで は 手探り の 状態 で ちる . 例え ば , 物理 の 理論 計 
算 な ど で は , 極端 な 場合 , 最後 の 一 つの 数 値 を , 対応 する 実験 値 と 照ら し 合わ せる こ 




















段階 で 使用 する と , その 効果 は 絶大 で ある . 






























































と に な る . 実験 誤差 の 範囲 や 理論 計算 の 精度 が は っ きり し て いた り , いろ いろ な 条件 


























フィ ックス を 扱え る よう に な っ た . 




















,。 結果 を 比較 する デー タ が な い 
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下 で の 実験 値 と 比較 で きた りす れ ば , プロ グラ ム の 正誤 の 判断 も 可能 で ある が , そう 
で な けれ ば 他 の 計算 手段 (60 年 代 で は 手回し 計算 機 ) で 一 通り の 計算 を し て , デバ ッ グ 
する 必要 が あっ た . その 過程 で , 計算 機 の 出力 を 方 眼 紙 の 上 に 手 で プロ ッ ト し て 考察 
する こと が よく あっ た . 1970 年 代 に 入り XY プロ ッ タ が 使え る よう に な る と , 早速 プ 
ロッ タ を 利用 する こと に な っ た . 当初 使え た 命令 は , ペン の 現在 位置 を 原点 と する 命 
令 と , 指定 し た 位置 まで ペン を 上 げた まま , ある い は 下げ た まま 移動 し な さい と いう 
命令 だ け で あっ た . そこ で , 初期 化 は . ペン を > ある い は ? ヵ の 負 の 方 向 に 大 きく 移動 
させ , 装置 の 端 に 押し 付け て . そこ を 原点 と する こと で あっ た . それ で も , 便利 な 副 
プロ グラ ム を 作れ ば , 楽に 使い こなす こと は で きた が , 紙 の 上 に 描く の で ある か ら 時 
間 が か か り , あま り 便 利 な こと で は な か っ た . 

1980 年 代 に 入り , CRT (テレ ビ 画 面 ) が 使え る よう に な る と , グラ フィ ックス の 国際 
規格 の GKS 等 が 制定 され た り し て , 状況 は 一 転 し , 現在 の アニ メー ショ ン へ と 発展 
する こと に な っ た . 当時 , GKS 等 の グラ フィ ックス パッ ケー ジ は 非常 に 高価 な も の で 
あっ た が , 計算 セン ター な どの 汎用 大 型 計算 機 で は FORTRAN コン パイ ラ な ど と と 
も に 導入 され , 身近 で 使い や すい も の で あっ た . し か し , 1990 年 代 に な り ,. ワー クス 
テー ショ ン や パソ コン 等 へ の ダウ ン サ イジ ング が 進む と , 個々 の の プラットホーム ご と 
で の パッ ケー ジ の 導入 が 難し く な り , GKS を 使っ た 過去 の 財産 が 使え なく な る と いう 
危機 に 直面 する こと と な っ た . そこ で , 著者 は PC の Windows の グラ フィ ックス 機能 
を 使っ て , Fortran で 呼べ る GKS の 小さ な サブ セッ ト と な る サブ ルー チン パッ ケー ジ 
を 作っ た [ 員 . また , Java が 一 般 的 に 使え る よう に な っ て きた の で , すでに 述べ た よ 
うに Java の グラ フィ ックス 機能 を 使っ て , GKS タイ プ の 図形 出力 な どの クラ ス を 作 
成 し .。 パッ ケー ジ mygks と し て 提供 する こと に な っ た . 

最後 に , 本書 が , 理工 系 の 若い 学生 は も と より , IT 産業 に 従事 し て いる 科学 技術 研 
究 者 が .、 ソ フト ウェ ア の 根幹 の 一 つ を な し て いる 数 値 解 析 の 原理 を 学ぶ こと に 役立ち , 
また , 昭和 の 手続 型 言語 の 時 代 に 日 本 の 高度 成長 を 支え て きた 中 高 年 の エキ スパ ー ト 
に と っ て , 平成 の オブ ジェ クト 指向 言語 の 一 つ で ある Java に 親しむ きっかけ と な り , 
元気 を 取り 戻し て も ら う こと に 少し で も ゃ 役立つ な ら ば . それ は 本 当 に 望 外 の 喜び で あ 
り ま す . 
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